[Bug fortran/78350] ICE in gfc_code2string(): Bad code, at fortran/misc.c:193

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

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

--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fortran@t-online.de> ---

Whereas, wrapped in a program :


$ cat z2.f90
program p
   type t
      character(2) :: c(1) = [character(3) :: 'abc']
   end type
   type(t) :: x
   print *, x
end


$ gfortran-7-20161113 z2.f90
$ a.out
 ab