------- Comment #2 from fxcoudert at gcc dot gnu dot org 2007-08-08 17:22 ------- I think it is indeed valid.
type :: my_type integer :: data end type my_type interface subroutine func1(param) import :: my_type type(my_type) :: param end subroutine func1 end interface type(my_type) :: x end -- fxcoudert at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- Status|UNCONFIRMED |NEW Ever Confirmed|0 |1 Keywords| |rejects-valid Last reconfirmed|0000-00-00 00:00:00 |2007-08-08 17:22:43 date| | http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32827