This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: [Patch, Fortran] PR40427: [F03] Procedure Pointer Components with OPTIONAL arguments
- From: Janus Weil <janus at gcc dot gnu dot org>
- To: Tobias Burnus <burnus at net-b dot de>
- Cc: gcc-patches at gcc dot gnu dot org, fortran at gcc dot gnu dot org, John M McFarland <john dot mcfarland at swri dot org>
- Date: Wed, 24 Jun 2009 13:08:52 +0200
- Subject: Re: [Patch, Fortran] PR40427: [F03] Procedure Pointer Components with OPTIONAL arguments
- References: <20090623123441.GA9369@net-b.de> <854832d40906240143p57e0f22du798867f7f21392f1@mail.gmail.com>
>> Otherwise it looks OK to me.
>
> I'll take this as an approval and commit later today.
Committed as r148906.
Cheers,
Janus
> 2009-06-24 ?Janus Weil ?<janus@gcc.gnu.org>
>
> ? ? ? ?PR fortran/40427
> ? ? ? ?* gfortran.h (gfc_component): New member 'formal_ns'.
> ? ? ? ?(gfc_copy_formal_args_ppc,void gfc_ppc_use): New.
> ? ? ? ?* interface.c (gfc_ppc_use): New function, analogous to
> ? ? ? ?gfc_procedure_use, but for procedure pointer components.
> ? ? ? ?* module.c (MOD_VERSION): Bump module version.
> ? ? ? ?(mio_component): Treat formal arguments.
> ? ? ? ?(mio_formal_arglist): Changed argument from gfc_symbol to
> ? ? ? ?gfc_formal_arglist.
> ? ? ? ?(mio_symbol): Changed argument of mio_formal_arglist.
> ? ? ? ?* resolve.c (resolve_ppc_call,resolve_expr_ppc): Call gfc_ppc_use,
> ? ? ? ?to check actual arguments and treat formal args correctly.
> ? ? ? ?(resolve_fl_derived): Copy formal args of procedure pointer components
> ? ? ? ?from their interface.
> ? ? ? ?* symbol.c (gfc_copy_formal_args_ppc): New function, analogous to
> ? ? ? ?gfc_copy_formal_args, but for procedure pointer components.
>
>
> 2009-06-24 ?Janus Weil ?<janus@gcc.gnu.org>
>
> ? ? ? ?PR fortran/40427
> ? ? ? ?* gfortran.dg/proc_ptr_comp_11.f90: New.
>