[Bug fortran/50410] [4.9/5/6/7 Regression] ICE in record_reference

[gerhard.steinmetz.fortran@t-online.de]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=50410

--- Comment #23 from Gerhard Steinmetz <gerhard.steinmetz.fortran@t-online.de> ---
These variants give :


$ cat z1.f90
program p
   type ta
      integer :: a
   end type
   type t
      type(ta), pointer :: b
   end type
   type(t) :: z
   data z / t(ta(1)) /
end

$ gfortran-6 z1.f90
f951: internal compiler error: in record_reference, at cgraphbuild.c:64



$ cat z2.f90
program p
   type ta
      integer :: a
   end type
   type t
      type(ta) :: b
   end type
   type(t), pointer :: z
   data z / t(ta(1)) /
end

$ gfortran-6 z2.f90
f951: internal compiler error: in record_reference, at cgraphbuild.c:64



$ cat z3.f90
program p
   type ta
      integer :: a
   end type
   type t
      type(ta), pointer :: b
   end type
   type(t), pointer :: z
   data z / t(ta(1)) /
end

$ gfortran-6 z3.f90
internal compiler error: in fold_convert_loc, at fold-const.c:2256