https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85798
Bug ID: 85798
Summary: ICE in get_array_index, at fortran/data.c:69
Product: gcc
Version: 9.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
While wrapped in a type, hits versions down to at least 4.8 :
$ cat z1.f90
program p
type t
integer, allocatable :: a(:)
end type
type(t) :: z
data z%a(1) / 789 /
end
$ gfortran-9-20180513 -c z1.f90
f951: internal compiler error: Segmentation fault
0xb9f4bf crash_signal
../../gcc/toplev.c:325
0x68e8da get_array_index
../../gcc/fortran/data.c:69
0x68e8da gfc_assign_data_value(gfc_expr*, gfc_expr*, __mpz_struct*,
__mpz_struct (*) [1])
../../gcc/fortran/data.c:282
0x711ee9 check_data_variable
../../gcc/fortran/resolve.c:15479
0x712232 traverse_data_var
../../gcc/fortran/resolve.c:15608
0x71cd01 resolve_data
../../gcc/fortran/resolve.c:15663
0x71cd01 resolve_types
../../gcc/fortran/resolve.c:16481
0x71839c gfc_resolve(gfc_namespace*)
../../gcc/fortran/resolve.c:16570
0x701b6a resolve_all_program_units
../../gcc/fortran/parse.c:6060
0x701b6a gfc_parse_file()
../../gcc/fortran/parse.c:6310
0x748adf gfc_be_parse_file
../../gcc/fortran/f95-lang.c:204
