[Patch, fortran] PR31726 - minloc/maxloc: wrong results with empty array (F2003 only)

[Paul Richard Thomas]

For some reason, the first attempt to send this picked up some mime content.

> Tobias,
>
> Please find attached a verson that works!  Thomas' testcase is now included.
>
> Bootstrapped and regtested on x86_ia64 - OK for trunk?
>
> Paul
>
> 2007-06-23  Paul Thomas  < pault@gcc.gnu.org>
>
>         PR fortran/32298
>         PR fortran/31726
>         * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc): Calculate
>
>         the offset between the loop counter and the position as
>         defined. Add the offset within the loop so that the mask
>         acts correctly.  Do not advance the location on the basis
>         that it is zero.
>
> 2007-06-23  Paul Thomas  < pault@gcc.gnu.org>
>
>         PR fortran/31726
>         * gfortran.dg/minmaxloc_1.f90: New test.
>
>         PR fortran/32298
>         * gfortran.dg/minmaxloc_2.f90: New test.
>


-- 
I love deadlines. I love the whooshing sound they make as they go by.
--Douglas Adams
-------------- next part --------------
A non-text attachment was scrubbed...
Name: submit.diff
Type: text/x-patch
Size: 10283 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20070623/723de440/attachment.bin>