This is the mail archive of the mailing list for the GCC project.

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [patch,fortran] PR33162 Allow intrinsic functions in PROCEDURE statements

Jerry DeLisle wrote:
:ADDPATCH fortran:

This patch allows intrinsics in PROCEDURE statements by removing the error call in decl.c and adding the necessary checks and resolving the interfaces. This is the last part to fixing this PR.

It has taken some time to get to this point, so I thought it best to get this out for review and testing with real code.

I think the explanation in the ChangeLog is sufficient.

Thanks to Janus Weil for several off list comments, now resolved.

Regression tested on x86-64. New test cases provided. One error condition in proc_decl_1.f90 is no longer an error, so that test is modified. See attached.

OK for trunk?



2007-11-11 Jerry DeLisle <>

PR fortran/33162
* decl.c (match_procedure_decl): Remove TODO and allow intrinsics in
PROCEDURE declarations. Set attr.untyped to allow the interface to be
resolved later where the symbol type will be set.
* interface.c (compare_intr_interfaces): Remove static from pointer
declarations. Add type and kind checks for dummy function arguments.
(compare_actual_formal_intr): New function to compare an actual
argument with an intrinsic function. (gfc_procedures_use): Add check for
interface that points to an intrinsic function, use the new function.

There is a spurious "My " in the error message added in gfc_procedure_use. I have taken care of that. :)


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]