The following is non-standard and the compiler should probably generate a warning/error with '-pedantic -std=f95'
MODULE T1 TYPE data_type SEQUENCE ! private causes the types in T1 and T2 to be different 4.4.2 PRIVATE INTEGER :: I END TYPE END MODULE MODULE T2 TYPE data_type SEQUENCE PRIVATE INTEGER :: I END TYPE CONTAINS SUBROUTINE TEST(x) TYPE(data_type) :: x END SUBROUTINE TEST END MODULE USE T1 USE T2 , ONLY : TEST TYPE(data_type) :: x CALL TEST(x) END -- Summary: error needed Product: gcc Version: 4.1.0 Status: UNCONFIRMED Severity: normal Priority: P2 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: jv244 at cam dot ac dot uk CC: gcc-bugs at gcc dot gnu dot org GCC target triplet: i686-pc-linux-gnu http://gcc.gnu.org/bugzilla/show_bug.cgi?id=20864