https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68155
Bug ID: 68155
Summary: ICE on initializing character array in type (len_lhs
<> len_rhs)
Product: gcc
Version: 5.2.1
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: [email protected]
Target Milestone: ---
Embedded in a type :
$ cat z1t.f90
program p
type t
character(2) :: z(1) = '' // ['y']
end type
type(t) :: z
print *, z
end
$ gfortran -g -O0 -Wall -fcheck=all z1t.f90
f951: internal compiler error: Segmentation fault
---
Simplified and correct :
$ cat z1c.f90
program p
character(2) :: z(1) = '' // ['y']
print *, '>>' // z // '<<'
end
$ gfortran -g -O0 -Wall -fcheck=all z1c.f90
$ a.out
>>y <<