http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60234
janus at gcc dot gnu.org changed: What |Removed |Added ---------------------------------------------------------------------------- Keywords| |ice-on-valid-code Status|UNCONFIRMED |NEW Last reconfirmed| |2014-02-17 CC| |janus at gcc dot gnu.org Summary|OOP internal compiler |[4.9 Regression] [OOP] ICE |error: in |in |generate_finalization_wrapp |generate_finalization_wrapp |er |er at fortran/class.c:1883 Ever confirmed|0 |1 --- Comment #1 from janus at gcc dot gnu.org --- Reduced test case: module ObjectLists implicit none Type TObjectList contains FINAL :: finalize end Type Type, extends(TObjectList):: TRealCompareList end Type contains subroutine finalize(L) Type(TObjectList) :: L end subroutine integer function CompareReal(this) Class(TRealCompareList) :: this end function end module 4.8 rejects it cleanly ('not yet implemented'), so the ICE is a regression.