[Bug fortran/70870] Segmentation violation in gfc_assign_data_value

[kargl at gcc dot gnu.org]

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

--- Comment #7 from kargl at gcc dot gnu.org ---
(In reply to Gerhard Steinmetz from comment #2)
> A variant that aborts with this message directly :
> 
> $ gfortran-6 z1.f90
> f951: internal compiler error: in gfc_assign_data_value, at
> fortran/data.c:449
> 
> $ cat z1.f90
> program p
>    type t
>       integer :: n
>    end type
>    type(t), pointer :: z => null()
>    data z%n / 3 /
>    print *, z%n
> end
> 
> ---
> 
> A minimal change of z1.f90 immediately points to pr50410 :
> 
> $ cat z2.f90
> program p
>    type t
>       integer :: n
>    end type
>    type(t), pointer :: z
>    data z%n / 3 /
>    print *, z%n
> end
> 
> $ gfortran-6 z2.f90
> f951: internal compiler error: in record_reference, at cgraphbuild.c:64

These "variant" are different problems than the one in the intial
post.  The original problem is considered with an entity that 
has a default initializer appearing in a DATA statement.  The
above examples are issues with a unassociated pointer appearing
a DATA statement.  These should have a new PR opened for them.