This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/23092] [4.1 only] scalar mask for minval/maxval/sum/product
- From: "tkoenig at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 5 Mar 2006 20:03:12 -0000
- Subject: [Bug fortran/23092] [4.1 only] scalar mask for minval/maxval/sum/product
- References: <bug-23092-10391@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #5 from tkoenig at gcc dot gnu dot org 2006-03-05 20:03 -------
Subject: Bug 23092
Author: tkoenig
Date: Sun Mar 5 20:03:08 2006
New Revision: 111742
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=111742
Log:
2006-03-05 Thomas Koenig <Thomas.Koenig@online.de>
PR fortran/23092
backport from mainline
* 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.
* trans-intrinsic.c (gfc_conv_intrinsic_arith): If the
mask expression exists and has rank 0, enclose the generated
loop in an "if (mask)".
* (gfc_conv_intrinsic_minmaxloc): Likewise.
2006-03-05 Thomas Koenig <Thomas.Koenig@online.de>
PR fortran/23092
backport from mainline
* gfortran.dg/scalar_mask_1.f90: New test.
Added:
branches/gcc-4_1-branch/gcc/testsuite/gfortran.dg/scalar_mask_1.f90
Modified:
branches/gcc-4_1-branch/gcc/fortran/ChangeLog
branches/gcc-4_1-branch/gcc/fortran/trans-intrinsic.c
branches/gcc-4_1-branch/gcc/testsuite/ChangeLog
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23092