------- Comment #4 from tkoenig at gcc dot gnu dot org  2006-02-25 10:32 -------
Subject: Bug 23092

Author: tkoenig
Date: Sat Feb 25 10:32:19 2006
New Revision: 111438

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=111438
Log:
2006-02-25  Thomas Koenig  <[EMAIL PROTECTED]>

        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  <[EMAIL PROTECTED]>

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


Added:
    trunk/gcc/testsuite/gfortran.dg/scalar_mask_1.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/trans-intrinsic.c
    trunk/gcc/testsuite/ChangeLog


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23092

Reply via email to