------- Comment #6 from mikael at gcc dot gnu dot org 2008-12-30 22:47 ------- An other failure:
use iso_c_binding
type t1
integer :: i(5)
end type t1
type t2
type(t1) :: t(5)
end type t2
character(len=2),target :: str(2)
type(t2), target :: tt
type(C_PTR) :: p
p = c_loc(tt%t%i(1))
end
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38536
