This is the mail archive of the
gcc-cvs@gcc.gnu.org
mailing list for the GCC project.
r111562 - in /trunk/gcc: fortran/ChangeLog fort...
- From: tkoenig at gcc dot gnu dot org
- To: gcc-cvs at gcc dot gnu dot org
- Date: Tue, 28 Feb 2006 11:12:23 -0000
- Subject: r111562 - in /trunk/gcc: fortran/ChangeLog fort...
Author: tkoenig
Date: Tue Feb 28 11:12:22 2006
New Revision: 111562
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=111562
Log:
2006-02-28 Thomas Koenig <Thomas.Koenig@online.de>
* trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc):
If the mask expression exists and has rank 0, enclose the
generated loop in an "if (mask)". Put the default
initialization into the else branch.
2006-02-28 Thomas Koenig <Thomas.Koenig@online.de>
* scalar_mask_1.f90: Add tests for maxloc with scalar mask.
Modified:
trunk/gcc/fortran/ChangeLog
trunk/gcc/fortran/trans-intrinsic.c
trunk/gcc/testsuite/ChangeLog
trunk/gcc/testsuite/gfortran.dg/scalar_mask_1.f90