mirror of
git://gcc.gnu.org/git/gcc.git
synced 2025-04-18 13:01:06 +08:00
re PR middle-end/36300 (Incorrect type used for inlined expression)
2008-05-26 Richard Guenther <rguenther@suse.de> PR middle-end/36300 * fold-const.c (extract_muldiv_1): Use TYPE_OVERFLOW_WRAPS, not TYPE_UNSIGNED. Use TYPE_PRECISION instead of GET_MODE_SIZE. * gcc.dg/pr36300-1.c: New testcase. * gcc.dg/pr36300-2.c: Likewise. From-SVN: r135913
This commit is contained in:
parent
d6ca724ce2
commit
fcb4587ef6
@ -1,3 +1,9 @@
|
||||
2008-05-26 Richard Guenther <rguenther@suse.de>
|
||||
|
||||
PR middle-end/36300
|
||||
* fold-const.c (extract_muldiv_1): Use TYPE_OVERFLOW_WRAPS,
|
||||
not TYPE_UNSIGNED. Use TYPE_PRECISION instead of GET_MODE_SIZE.
|
||||
|
||||
2008-05-26 Daniel Franke <franke.daniel@gmail.com>
|
||||
|
||||
PR bootstrap/36331
|
||||
|
@ -5736,17 +5736,17 @@ extract_muldiv_1 (tree t, tree c, enum tree_code code, tree wide_type,
|
||||
|| BINARY_CLASS_P (op0)
|
||||
|| VL_EXP_CLASS_P (op0)
|
||||
|| EXPRESSION_CLASS_P (op0))
|
||||
/* ... and is unsigned, and its type is smaller than ctype,
|
||||
then we cannot pass through as widening. */
|
||||
&& ((TYPE_UNSIGNED (TREE_TYPE (op0))
|
||||
/* ... and has wrapping overflow, and its type is smaller
|
||||
than ctype, then we cannot pass through as widening. */
|
||||
&& ((TYPE_OVERFLOW_WRAPS (TREE_TYPE (op0))
|
||||
&& ! (TREE_CODE (TREE_TYPE (op0)) == INTEGER_TYPE
|
||||
&& TYPE_IS_SIZETYPE (TREE_TYPE (op0)))
|
||||
&& (GET_MODE_SIZE (TYPE_MODE (ctype))
|
||||
> GET_MODE_SIZE (TYPE_MODE (TREE_TYPE (op0)))))
|
||||
&& (TYPE_PRECISION (ctype)
|
||||
> TYPE_PRECISION (TREE_TYPE (op0))))
|
||||
/* ... or this is a truncation (t is narrower than op0),
|
||||
then we cannot pass through this narrowing. */
|
||||
|| (GET_MODE_SIZE (TYPE_MODE (type))
|
||||
< GET_MODE_SIZE (TYPE_MODE (TREE_TYPE (op0))))
|
||||
|| (TYPE_PRECISION (type)
|
||||
< TYPE_PRECISION (TREE_TYPE (op0)))
|
||||
/* ... or signedness changes for division or modulus,
|
||||
then we cannot pass through this conversion. */
|
||||
|| (code != MULT_EXPR
|
||||
|
@ -1,3 +1,9 @@
|
||||
2008-05-26 Richard Guenther <rguenther@suse.de>
|
||||
|
||||
PR middle-end/36300
|
||||
* gcc.dg/pr36300-1.c: New testcase.
|
||||
* gcc.dg/pr36300-2.c: Likewise.
|
||||
|
||||
2008-05-26 Arnaud Charlet <charlet@adacore.com>
|
||||
|
||||
* gnat.dg/set_in_pproc.adb: New test.
|
||||
|
24
gcc/testsuite/gcc.dg/pr36300-1.c
Normal file
24
gcc/testsuite/gcc.dg/pr36300-1.c
Normal file
@ -0,0 +1,24 @@
|
||||
/* { dg-do run } */
|
||||
/* { dg-options "-O2 -fwrapv" } */
|
||||
|
||||
extern void abort (void);
|
||||
|
||||
#define VALUE ((int)((long long)U1 * (long long)3) + 2)
|
||||
|
||||
int main(void)
|
||||
{
|
||||
int U1;
|
||||
long long Y, Y2;
|
||||
int t;
|
||||
|
||||
U1 = -2147483647-1;
|
||||
|
||||
Y = ((long long)(VALUE * VALUE) * 3);
|
||||
|
||||
t = VALUE;
|
||||
Y2 = ((long long)(t * t) * 3);
|
||||
|
||||
if (Y != Y2)
|
||||
abort ();
|
||||
return 0;
|
||||
}
|
24
gcc/testsuite/gcc.dg/pr36300-2.c
Normal file
24
gcc/testsuite/gcc.dg/pr36300-2.c
Normal file
@ -0,0 +1,24 @@
|
||||
/* { dg-do run } */
|
||||
/* { dg-options "-O2" } */
|
||||
|
||||
extern void abort (void);
|
||||
|
||||
#define VALUE (unsigned int)((int)((long long)U1 * (long long)3) + 2)
|
||||
|
||||
int main(void)
|
||||
{
|
||||
int U1;
|
||||
long long Y, Y2;
|
||||
unsigned int t;
|
||||
|
||||
U1 = -2147483647-1;
|
||||
|
||||
Y = ((long long)(int)(VALUE * VALUE) * 3);
|
||||
|
||||
t = VALUE;
|
||||
Y2 = ((long long)(int)(t * t) * 3);
|
||||
|
||||
if (Y != Y2)
|
||||
abort ();
|
||||
return 0;
|
||||
}
|
Loading…
x
Reference in New Issue
Block a user