[Bug fortran/60234] [4.9 Regression] [OOP] ICE in generate_finalization_wrapper at fortran/class.c:1883

[janus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60234

--- Comment #3 from janus at gcc dot gnu.org ---
(In reply to janus from comment #2)
> Comment 1 compiles fine with this, but comment 0 hits another ICE:
> 
> ObjectLists.f90:186:0: internal compiler error: Segmentation fault
>          class is (object_array_pointer)
>  ^
> 0x93e90f crash_signal
> 	/home/jweil/gcc49/trunk/gcc/toplev.c:337
> 0x672420 gfc_get_derived_type(gfc_symbol*)
> 	/home/jweil/gcc49/trunk/gcc/fortran/trans-types.c:2455


A reduced test case for this ICE is:

  integer function Compare(R1)
    class(*) R1
  end function


But it seems to be due to the patch in comment 2 and does not occur without it.