See http://www.j3-fortran.org/doc/meeting/172/05-006ar1.txt Item F03/0019
QUESTION 1:
Does the following program conform to the 2003 standard?
program P
interface X
subroutine S ( A )
integer :: A
end subroutine S
procedure S
end interface X
end program P
ANSWER:
The program conforms to the 2003 standard. Multiple bindings of the
same procedure to a generic identifier using an interface body and a
procedure statement do not bind a "pair of specific procedures" to
the generic interface.
(For details see link above.)
gfortran currently rejects it with:
procedure S
1
Error: Entity 's' at (1) is already present in the interface
--
Summary: Valid generic procedure interface rejected
Product: gcc
Version: 4.6.0
Status: UNCONFIRMED
Keywords: rejects-valid
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: burnus at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=43948
