diff options
author | Andrew Pinski <pinskia@gmail.com> | 2007-11-04 11:04:49 -0800 |
---|---|---|
committer | Andrew Pinski <pinskia@gcc.gnu.org> | 2007-11-04 11:04:49 -0800 |
commit | 4c85a3da5f18632479e7f4a1d78f0620f0bb6198 (patch) | |
tree | 55fa5003a0462ba5e9d62abcbf6323f5f14e4780 /gcc/testsuite/gfortran.fortran-torture | |
parent | 7284a19735613a5b528e7115df1e30afeb30b48b (diff) | |
download | gcc-4c85a3da5f18632479e7f4a1d78f0620f0bb6198.zip gcc-4c85a3da5f18632479e7f4a1d78f0620f0bb6198.tar.gz gcc-4c85a3da5f18632479e7f4a1d78f0620f0bb6198.tar.bz2 |
re PR middle-end/32931 (FORALL and WHERE give an ICE with -m64)
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.
From-SVN: r129886
Diffstat (limited to 'gcc/testsuite/gfortran.fortran-torture')
-rw-r--r-- | gcc/testsuite/gfortran.fortran-torture/compile/forall-1.f90 | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.fortran-torture/compile/forall-1.f90 b/gcc/testsuite/gfortran.fortran-torture/compile/forall-1.f90 new file mode 100644 index 0000000..caaea08 --- /dev/null +++ b/gcc/testsuite/gfortran.fortran-torture/compile/forall-1.f90 @@ -0,0 +1,7 @@ + integer i, a(1) + logical(kind=8) s(1) + + s = .true. + a = 42 + forall (i=1:1, .not. s(1)) a(i) = 0 + end |