https://gcc.gnu.org/bugzilla/show_bug.cgi?id=93578
Bug ID: 93578
Summary: [10 Regression] ICE in add_init_expr_to_sym, at
fortran/decl.c:1949
Product: gcc
Version: 10.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
This changed between 20200105 and 20200110 :
$ cat z1.f90
program p
character(3), parameter :: a(4) = 'xyz'
character(*), parameter :: b(0) = (a(2:1))
print *, len(b), size(b), b
end
$ gfortran-10-20200105 z1.f90 && ./a.out
3 0
$ gfortran-10-20200202 -c z1.f90
f951: internal compiler error: in add_init_expr_to_sym, at fortran/decl.c:1949
0x633c15 add_init_expr_to_sym
../../gcc/fortran/decl.c:1949
0x63d560 variable_decl
../../gcc/fortran/decl.c:2939
0x63d560 gfc_match_data_decl()
../../gcc/fortran/decl.c:6120
0x6a0793 match_word
../../gcc/fortran/parse.c:65
0x6a0793 decode_statement
../../gcc/fortran/parse.c:376
0x6a21da next_free
../../gcc/fortran/parse.c:1279
0x6a21da next_statement
../../gcc/fortran/parse.c:1511
0x6a382b parse_spec
../../gcc/fortran/parse.c:3922
0x6a65fc parse_progunit
../../gcc/fortran/parse.c:5851
0x6a7cd9 gfc_parse_file()
../../gcc/fortran/parse.c:6392
0x6f295f gfc_be_parse_file
../../gcc/fortran/f95-lang.c:210
