The following program is currently accepted, although it is invalid:
abstract interface
subroutine bar(a)
integer :: a
end subroutine bar
end interface
procedure(bar), pointer :: foo
foo => bar
end
This problem was found by Tobias.
--
Summary: procedure pointer assignment to abstract interface
Product: gcc
Version: 4.4.0
Status: UNCONFIRMED
Keywords: accepts-invalid
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: janus at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38415