[Bug fortran/78278] ICE in gfc_wide_memset, at fortran/scanner.c:153

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

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

--- Comment #3 from Gerhard Steinmetz <gerhard.steinmetz.fortran@t-online.de> ---
Well, it's an extension ...

$ gfortran-7-20161106 -std=f95 -c z2.f90   # or -std=f2008
z2.f90:3:17:

    data x /null()/
                 1
Error: GNU Extension: re-initialization of 'x' at (1)

---

$ cat z8.f90
program p
   real :: x = 1.0
   data x /2.0/
   print *, x
end

$ gfortran-7-20161106 z8.f90
$ a.out
   2.00000000