http://gcc.gnu.org/bugzilla/show_bug.cgi?id=45827
janus at gcc dot gnu.org changed: What |Removed |Added ---------------------------------------------------------------------------- Summary|mio_component_ref(): |[4.6 Regression] |Component not found when |mio_component_ref(): |mixing f90 and f03 in large |Component not found |projects | --- Comment #33 from janus at gcc dot gnu.org 2010-12-27 14:22:12 UTC --- (In reply to comment #32) > Same error for this testcase: Thanks for the test case, Daniel. Here is a slightly reduced version: MODULE m TYPE, ABSTRACT :: t PRIVATE INTEGER :: n CONTAINS PROCEDURE :: get END TYPE ABSTRACT INTERFACE SUBROUTINE create(this) IMPORT t CLASS(t) :: this END SUBROUTINE END INTERFACE CONTAINS FUNCTION get(this) CLASS(t) :: this REAL, DIMENSION(this%n) :: get END FUNCTION SUBROUTINE destroy(this) CLASS(t) :: this END SUBROUTINE END MODULE PROGRAM p USE m END Also, note that this is a regression (the test case works with 4.5).