https://gcc.gnu.org/bugzilla/show_bug.cgi?id=102816
Bug ID: 102816
Summary: [12 Regression] ICE in resolve_structure_cons, at
fortran/resolve.c:1467
Product: gcc
Version: 12.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Started between 20211010 and 20211017 :
$ cat z1.f90
program p
type t
integer :: a([2])
end type
type(t) :: x = t([3, 4])
end
$ gfortran-12-20211017 -c z1.f90
f951: internal compiler error: in resolve_structure_cons, at
fortran/resolve.c:1467
0x81a894 resolve_structure_cons
../../gcc/fortran/resolve.c:1466
0x80a31c resolve_generic_f
../../gcc/fortran/resolve.c:2799
0x80a31c resolve_function
../../gcc/fortran/resolve.c:3301
0x80a31c gfc_resolve_expr(gfc_expr*)
../../gcc/fortran/resolve.c:7143
0x79c024 gfc_reduce_init_expr(gfc_expr*)
../../gcc/fortran/expr.c:3125
0x79f290 gfc_match_init_expr(gfc_expr**)
../../gcc/fortran/expr.c:3173
0x789a04 variable_decl
../../gcc/fortran/decl.c:3019
0x789a04 gfc_match_data_decl()
../../gcc/fortran/decl.c:6328
0x7f2d63 match_word
../../gcc/fortran/parse.c:67
0x7f2d63 decode_statement
../../gcc/fortran/parse.c:378
0x7f47aa next_free
../../gcc/fortran/parse.c:1388
0x7f47aa next_statement
../../gcc/fortran/parse.c:1620
0x7f5ecb parse_spec
../../gcc/fortran/parse.c:4159
0x7f8c9c parse_progunit
../../gcc/fortran/parse.c:6125
0x7fa421 gfc_parse_file()
../../gcc/fortran/parse.c:6666
0x8476bf gfc_be_parse_file
../../gcc/fortran/f95-lang.c:216
