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