projects / gcc.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: a487672) | patch
re PR fortran/23092 ([4.1 only] scalar mask for minval/maxval/sum/product)
authorThomas Koenig <Thomas.Koenig@online.de>
Sat, 25 Feb 2006 10:32:19 +0000 (10:32 +0000)
committerThomas Koenig <tkoenig@gcc.gnu.org>
Sat, 25 Feb 2006 10:32:19 +0000 (10:32 +0000)
commiteaf618e3a990a27563ffd46f9042c826485a34e6
tree48fbd3a405f48a2c5a5b42dfd111d2cc2c0b1002tree
parenta4876725625720be4440e612ef1acdfdfc4f9ac8commit | diff
re PR fortran/23092 ([4.1 only] scalar mask for minval/maxval/sum/product)

2006-02-25  Thomas Koenig  <Thomas.Koenig@online.de>

PR fortran/23092
* 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-02-25  Thomas Koenig  <Thomas.Koenig@online.de>

PR fortran/23092
* scalar_mask_1.f90:  New test.

From-SVN: r111438
gcc/fortran/ChangeLog diff | blob | history
gcc/fortran/trans-intrinsic.c diff | blob | history
gcc/testsuite/ChangeLog diff | blob | history
gcc/testsuite/gfortran.dg/scalar_mask_1.f90 [new file with mode: 0644] blob