https://gcc.gnu.org/bugzilla/show_bug.cgi?id=54633

Thomas Koenig <tkoenig at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |tkoenig at gcc dot gnu.org

--- Comment #4 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
integer x(minval((/1/))) is accepted now.

integer y((sum(minloc((/1/)))) is rejected with the
(IMHO misleading) error message

   integer y((sum(minloc((/1/))))
                                1
Error: Expected another dimension in array declaration at (1)

integer x(minval((/1/),mask=(/.TRUE./)))

is accepted.

  integer, parameter :: m = minval((/1/))

is now rejected with -std=f95 and accepted by default:

   integer, parameter :: m = minval((/1/))
                           1
Error: Fortran 2003: Transformational function 'minval' at (1) is invalid in an
initialization expression

So, this PR is mostly fixed except for the sum(minloc(((1))) issue.

Reply via email to