https://gcc.gnu.org/bugzilla/show_bug.cgi?id=82077
janus at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Last reconfirmed| |2017-09-02
Ever confirmed|0 |1
--- Comment #2 from janus at gcc dot gnu.org ---
This slightly reduced test case only needs a sinlge type and a one-dimensional
array:
type :: child
end type
class(child), allocatable :: foo(:)
allocate(foo(1))
select type(foo)
class is (child)
call gfortran7_ICE(foo(1:1))
end select
contains
subroutine gfortran7_ICE(bar)
class(child) bar(:)
end subroutine
end
