http://gcc.gnu.org/bugzilla/show_bug.cgi?id=57710
janus at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
Summary|[OOP] _vptr not set for |[OOP] [F08] _vptr not set
|allocatable CLASS |for allocatable CLASS
|components |component inside BLOCK
--- Comment #3 from janus at gcc dot gnu.org ---
(In reply to Tobias Burnus from comment #0)
> Additionally, the test case as is (with IF condition), currently crashes
> with:
>
> internal compiler error: in gfc_conv_component_ref, at
> fortran/trans-expr.c:1654
Also the ICE occurs only with the BLOCK construct. Slightly reduced test case:
module m
type t
end type
type t2
class(t), allocatable :: x
end type
end module
use m
type(t) :: z
block
type(t2) :: y
if (.not. same_type_as(y%x, z)) call abort ()
end block
end