module modice interface real function foo () end function end interface end module modice function foo () use modice implicit none ! foo = 6 end function foo
ICEs in: internal compiler error: in gfc_typenode_for_spec, at fortran/trans-types.c:631 -- Summary: ICE in gfc_typenode_for_spec Product: gcc Version: 4.0.1 Status: UNCONFIRMED Severity: normal Priority: P2 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: jakub at gcc dot gnu dot org CC: gcc-bugs at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=21729