------- Comment #3 from tkoenig at gcc dot gnu dot org 2007-01-11 20:32 ------- Subject: Bug 30415
Author: tkoenig Date: Thu Jan 11 20:32:42 2007 New Revision: 120685 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=120685 Log: 2007-01-11 Thomas Koenig <[EMAIL PROTECTED]> PR libfortran/30415 * iresolve.c (gfc_resolve_maxloc): If the rank of the return array is nonzero and we process an integer array smaller than default kind, coerce the array to default integer. * iresolve.c (gfc_resolve_minloc): Likewise. 2007-01-11 Thomas Koenig <[EMAIL PROTECTED]> PR libfortran/30415 * minmaxloc_integer_kinds_1.f90: New test. Added: trunk/gcc/testsuite/gfortran.dg/minmaxloc_integer_kinds_1.f90 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/iresolve.c trunk/gcc/testsuite/ChangeLog -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=30415
