On 07/16/2012 11:09 AM, Janus Weil wrote:
the attached patch is the solution that I came up with for this PR
(after two simpler but wrong attempts, see PR). The issue addressed
here is the setting of the if_source attribute for dummy procedures.
When declaring a procedure (pointer) with the PROCEDURE statement, the
attributes of the dummies (including if_source) should be copied from
the source interface (cf. gfc_copy_formal_args).
The patch was successfully regtested on x86_64-unknown-linux-gnu. Ok for trunk?
The patch looks fine. Thanks!
Tobias
2012-07-16 Janus Weil <ja...@gcc.gnu.org>
PR fortran/53956
* gfortran.h (gfc_copy_formal_args,gfc_copy_formal_args_ppc): Modified
prototypes.
* symbol.c (gfc_copy_formal_args): New argument 'if_src'. Copy if_source
of dummy procedures.
(gfc_copy_formal_args_ppc): Ditto.
* resolve.c (resolve_procedure_interface): Pass IFSRC_DECL to
gfc_copy_formal_args.
(resolve_fl_derived0): Pass IFSRC_DECL to gfc_copy_formal_args_ppc.
2012-07-16 Janus Weil <ja...@gcc.gnu.org>
PR fortran/53956
* gfortran.dg/proc_decl_28.f90: New.
