https://gcc.gnu.org/bugzilla/show_bug.cgi?id=125762
Bug ID: 125762
Summary: Segfault in gfc_conv_scalarized_array_ref for a DATA
statement
Product: gcc
Version: 17.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: jvdelisle at gcc dot gnu.org
Target Milestone: ---
This is simply ugly.
$ cat z3.f90
program m
integer, target :: t(10) = 1
integer, pointer :: ptr
data ptr /t(2)/
end
$ gfc z3.f90
z3.f90:1:11:
1 | program m
| 1
internal compiler error: Segmentation fault
0x24e902f internal_error(char const*, ...)
../../trunk/gcc/diagnostic-global-context.cc:787
0xf3f58f crash_signal
../../trunk/gcc/toplev.cc:325
0x7f97a7 gfc_conv_scalarized_array_ref
../../trunk/gcc/fortran/trans-array.cc:4318
0x7fa7ac gfc_conv_array_ref(gfc_se*, gfc_array_ref*, gfc_expr*, locus*)
../../trunk/gcc/fortran/trans-array.cc:4483
0x847416 gfc_conv_variable
../../trunk/gcc/fortran/trans-expr.cc:3443
0x845459 gfc_conv_initializer(gfc_expr*, gfc_typespec*, tree_node*, bool, bool,
bool)
../../trunk/gcc/fortran/trans-expr.cc:9622
0x82419b gfc_get_symbol_decl(gfc_symbol*)
../../trunk/gcc/fortran/trans-decl.cc:2108
0x828077 generate_local_decl
../../trunk/gcc/fortran/trans-decl.cc:6506
0x7cbd92 do_traverse_symtree
../../trunk/gcc/fortran/symbol.cc:4521
