[Patch, Fortran] PR fortran/34162: Internal procedure as actual argument

[H.J. Lu]

On Fri, Sep 3, 2010 at 3:38 AM, Daniel Kraft <d@domob.eu> wrote:
> Hi,
>
> the attached patch implements the Fortran 2008 feature of internal
> procedures as actual arguments.  Since the middle-end already supports this
> natively, all that had to be done was update the resolve.c check
> accordingly.
>
> I tried to add a challenging test-case, and it seems to work just like a
> charm.  This feature is hopefully quite useful, at least myself I would have
> liked to use it already some times.
>
> Currently regtesting on GNU/Linux-x86-32.  Ok for trunk if no regressions?
>
> Yours,
> Daniel
>
> --
> http://www.pro-vegan.info/
> --
> Done:  Arc-Bar-Cav-Kni-Ran-Rog-Sam-Tou-Val-Wiz
> To go: Hea-Mon-Pri
>
> 2010-09-03  Daniel Kraft  <d@domob.eu>
>
>        PR fortran/34162
>        * resolve.c (resolve_actual_arglist): Allow internal procedure
>        as actual argument with Fortran 2008.
>
> 2010-09-03  Daniel Kraft  <d@domob.eu>
>
>        PR fortran/34162
>        * gfortran.dg/internal_dummy_1.f03: Renamed from .f90, add
> -std=f2003.
>        * gfortran.dg/internal_dummy_2.f08: New test.
>        * gfortran.dg/internal_dummy_3.f08: New test.
>        * gfortran.dg/internal_dummy_4.f08: New test.
>

This may have caused:

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=45525

H.J.