diff options
| author | pinskia <pinskia@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-11-04 19:04:49 +0000 |
|---|---|---|
| committer | pinskia <pinskia@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-11-04 19:04:49 +0000 |
| commit | ed14361e422c15578d8f999bd5c3c511c1efd8b1 (patch) | |
| tree | 55fa5003a0462ba5e9d62abcbf6323f5f14e4780 /gcc/fold-const.c | |
| parent | 0a239457eef197ecbf1203869ef32975253af5b6 (diff) | |
| download | gcc-ed14361e422c15578d8f999bd5c3c511c1efd8b1.tar.gz | |
2007-11-04 Andrew Pinski <pinskia@gmail.com>
PR middle-end/32931
* fold-const.c (fold_binary <case EQ_EXPR>): Convert the inner type
for TRUTH_NOT_EXPR to type.
2007-11-04 Andrew Pinski <pinskia@gmail.com>
PR middle-end/32931
* gfortran.fortran-torture/compile/forall-1.f90: New testcase.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@129886 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fold-const.c')
| -rw-r--r-- | gcc/fold-const.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fold-const.c b/gcc/fold-const.c index a7d2756116b..a09c9ea7ea0 100644 --- a/gcc/fold-const.c +++ b/gcc/fold-const.c @@ -11709,12 +11709,12 @@ fold_binary (enum tree_code code, tree type, tree op0, tree op1) /* bool_var != 1 becomes !bool_var. */ if (TREE_CODE (TREE_TYPE (arg0)) == BOOLEAN_TYPE && integer_onep (arg1) && code == NE_EXPR) - return fold_build1 (TRUTH_NOT_EXPR, type, arg0); + return fold_build1 (TRUTH_NOT_EXPR, type, fold_convert (type, arg0)); /* bool_var == 0 becomes !bool_var. */ if (TREE_CODE (TREE_TYPE (arg0)) == BOOLEAN_TYPE && integer_zerop (arg1) && code == EQ_EXPR) - return fold_build1 (TRUTH_NOT_EXPR, type, arg0); + return fold_build1 (TRUTH_NOT_EXPR, type, fold_convert (type, arg0)); /* If this is an equality comparison of the address of two non-weak, unaliased symbols neither of which are extern (since we do not |