https://gcc.gnu.org/bugzilla/show_bug.cgi?id=61420
Bug ID: 61420
Summary: type bound procedure with pass attribute, that returns
a procedure pointer, fails to compile
Product: gcc
Version: 4.9.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: robert.rosenberg at nrl dot navy.mil
Created attachment 32894
--> https://gcc.gnu.org/bugzilla/attachment.cgi?id=32894&action=edit
defines type bound procedure that returns a procedure pointer
I was writing some sample code that defines a function that returns a pointer
procedure.
When I compile the code with Intel Ifort.14.x/15.x it complains saying that
this exact feature is not supported.
When I compile with GNU gfortran49, it compiles and runs fine. But when I
insert the statement, 'implicit none' at the beginning of the code, the code
fails to compile. If I then use an implicit procedure pointer interface, it
again runs fine.
I include the code as an attachment
