------- Comment #5 from burnus at gcc dot gnu dot org 2010-07-08 07:27 ------- Thanks for the bug fix! For completeness, the commit was:
Author: tkoenig Date: Tue Jul 6 19:48:58 2010 New Revision: 161884 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=161884 Log: 2010-07-06 Thomas Koenig <tkoe...@gcc.gnu.org> PR fortran/PR44693 * check.c (dim_rank_check): Also check intrinsic functions. Adjust permissible rank for functions which reduce the rank of their argument. Spread is an exception, where DIM can be one larger than the rank of array. 2010-07-06 Thomas Koenig <tkoe...@gcc.gnu.org> PR fortran/PR44693 * gfortran.dg/dim_range_1.f90: New test. * gfortran.dg/minmaxloc_4.f90: Remove invalid test. Added: trunk/gcc/testsuite/gfortran.dg/dim_range_1.f90 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/check.c trunk/gcc/testsuite/ChangeLog trunk/gcc/testsuite/gfortran.dg/minmaxloc_4.f90 -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44693