* trans-stmt.c (gfc_trans_forall_1): Optimize the cases where the
commit0b4337472ae18e4d89e9a56683fb98541df101a0
authorsayle <sayle@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 8 Feb 2007 16:41:18 +0000 (8 16:41 +0000)
committersayle <sayle@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 8 Feb 2007 16:41:18 +0000 (8 16:41 +0000)
tree75e0d7456cf8fa5760ed4e45b9344dabaa89e88e
parentc8a78da7c5712909dc6ba58444c4de5ce23773e5
* trans-stmt.c (gfc_trans_forall_1): Optimize the cases where the
mask expression is a compile-time constant (".true." or ".false.").

* gfortran.dg/forall_8.f90: New test case.
* gfortran.dg/forall_9.f90: Likewise.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@121714 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/trans-stmt.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/forall_8.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/forall_9.f90 [new file with mode: 0644]