http://gcc.gnu.org/bugzilla/show_bug.cgi?id=59093
janus at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |janus at gcc dot gnu.org
--- Comment #3 from janus at gcc dot gnu.org ---
Further reduced test case:
implicit none
type :: MAPL_LocStream
type(MAPL_LocStreamType), pointer :: Ptr
end type
type MAPL_Tiling
integer :: IM
end type
type MAPL_LocStreamType
type(MAPL_Tiling), pointer :: Tiling(:)
end type
contains
subroutine MAPL_LocStreamGet (GRIDIM)
type(MAPL_LocStream) :: LocStream
integer, pointer :: GRIDIM(:)
GRIDIM => LocStream%Ptr%Tiling(:)%IM
end subroutine
end
