diff options
| author | Thomas Koenig <Thomas.Koenig@online.de> | 2006-02-25 10:32:19 +0000 |
|---|---|---|
| committer | Thomas Koenig <tkoenig@gcc.gnu.org> | 2006-02-25 10:32:19 +0000 |
| commit | eaf618e3a990a27563ffd46f9042c826485a34e6 (patch) | |
| tree | 48fbd3a405f48a2c5a5b42dfd111d2cc2c0b1002 /gcc/scan-decls.c | |
| parent | a4876725625720be4440e612ef1acdfdfc4f9ac8 (diff) | |
| download | gcc-eaf618e3a990a27563ffd46f9042c826485a34e6.zip gcc-eaf618e3a990a27563ffd46f9042c826485a34e6.tar.gz gcc-eaf618e3a990a27563ffd46f9042c826485a34e6.tar.bz2 | |
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
Diffstat (limited to 'gcc/scan-decls.c')
0 files changed, 0 insertions, 0 deletions