https://gcc.gnu.org/bugzilla/show_bug.cgi?id=106986
Bug ID: 106986
Summary: [10/11/12/13 Regression] ICE in
simplify_findloc_nodim, at fortran/simplify.cc:5675
Product: gcc
Version: 13.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 20211031 and 20211107 :
$ cat z1.f90
program p
integer, parameter :: a(:) = [1]
print *, findloc(a, 1)
end
$ gfortran-13-20220918 -c z1.f90
z1.f90:2:29:
2 | integer, parameter :: a(:) = [1]
| 1
Error: Parameter array 'a' at (1) cannot be automatic or of deferred shape
f951: internal compiler error: Segmentation fault
0xf3a72f crash_signal
../../gcc/toplev.cc:314
0x881fd0 simplify_findloc_nodim
../../gcc/fortran/simplify.cc:5675
0x88c259 gfc_simplify_findloc(gfc_expr*, gfc_expr*, gfc_expr*, gfc_expr*,
gfc_expr*, gfc_expr*)
../../gcc/fortran/simplify.cc:5941
0x809024 do_simplify
../../gcc/fortran/intrinsic.cc:4698
0x813f1a gfc_intrinsic_func_interface(gfc_expr*, int)
../../gcc/fortran/intrinsic.cc:5056
0x8695b8 resolve_unknown_f
../../gcc/fortran/resolve.cc:2990
0x8695b8 resolve_function
../../gcc/fortran/resolve.cc:3347
0x8695b8 gfc_resolve_expr(gfc_expr*)
../../gcc/fortran/resolve.cc:7194
0x86f8bc gfc_resolve_expr(gfc_expr*)
../../gcc/fortran/resolve.cc:7161
0x86f8bc gfc_resolve_code(gfc_code*, gfc_namespace*)
../../gcc/fortran/resolve.cc:11974
0x86e34f gfc_resolve_blocks(gfc_code*, gfc_namespace*)
../../gcc/fortran/resolve.cc:10972
0x86e6a8 gfc_resolve_code(gfc_code*, gfc_namespace*)
../../gcc/fortran/resolve.cc:11964
0x871457 resolve_codes
../../gcc/fortran/resolve.cc:17617
0x87151e gfc_resolve(gfc_namespace*)
../../gcc/fortran/resolve.cc:17652
0x8592e4 resolve_all_program_units
../../gcc/fortran/parse.cc:6606
0x8592e4 gfc_parse_file()
../../gcc/fortran/parse.cc:6862
0x8a7ccf gfc_be_parse_file
../../gcc/fortran/f95-lang.cc:229
