[patch, libfortran/30415]

[Steve Kargl]

On Tue, Jan 09, 2007 at 11:37:04PM +0100, Thomas Koenig wrote:
> 
> 2007-01-09  Thomas Koenig  <Thomas.Koenig@online.de>
> 
> 	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-09  Thomas Koenig  <Thomas.Koenig@online.de>
> 
> 	PR libfortran/30415
> 	* minmaxloc_integer_kinds_1.f90:  New test.

OK.

-- 
Steve