http://gcc.gnu.org/bugzilla/show_bug.cgi?id=43366
--- Comment #3 from janus at gcc dot gnu.org 2011-02-03 20:45:04 UTC --- Test case: type :: t integer :: i end type class(t), allocatable :: x type(t) :: y = t (3) x = y print *,x%i end
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=43366
--- Comment #3 from janus at gcc dot gnu.org 2011-02-03 20:45:04 UTC --- Test case: type :: t integer :: i end type class(t), allocatable :: x type(t) :: y = t (3) x = y print *,x%i end