https://gcc.gnu.org/bugzilla/show_bug.cgi?id=127671
Bug ID: 127671
Summary: [17 Regression] ICE: span.4 from write_var referenced
in write_rtovp
Product: gcc
Version: 17.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: anlauf at gcc dot gnu.org
Target Milestone: ---
Created attachment 65724
--> https://gcc.gnu.org/bugzilla/attachment.cgi?id=65724&action=edit
Reproducer
This is a recent regression:
gfortran-17 -c mo_rad.f90
mo_rad.f90:10:3:
10 | subroutine write_rtovp(r_arr)
| ^~~~~~~~~~~~~~~~~~~~~~
internal compiler error: span.4 from write_var referenced in write_rtovp
0x3e4ae23 internal_error(char const*, ...)
../../gcc-trunk/gcc/diagnostic-global-context.cc:787
0x1ca3498 convert_nonlocal_reference_op
../../gcc-trunk/gcc/tree-nested.cc:1209
0x203b13b walk_tree_1(tree_node**, tree_node* (*)(tree_node**, int*, void*),
void*, hash_set<tree_node*, false, default_hash_traits<tree_node*> >*,
tree_node* (*)(tree_node**, int*, tree_node* (*)(tree_node**, int*, void*),
void*, hash_set<tree_node*, false, default_hash_traits<tree_node*> >*))
../../gcc-trunk/gcc/tree.cc:11870
0x16a252e walk_gimple_op(gimple*, tree_node* (*)(tree_node**, int*, void*),
walk_stmt_info*)
../../gcc-trunk/gcc/gimple-walk.cc:232
0x16a3709 walk_gimple_stmt(gimple_stmt_iterator*, tree_node*
(*)(gimple_stmt_iterator*, bool*, walk_stmt_info*), tree_node* (*)(tree_node**,
int*, void*), walk_stmt_info*)
../../gcc-trunk/gcc/gimple-walk.cc:637
0x16a1b46 walk_gimple_seq_mod(gimple**, tree_node* (*)(gimple_stmt_iterator*,
bool*, walk_stmt_info*), tree_node* (*)(tree_node**, int*, void*),
walk_stmt_info*)
../../gcc-trunk/gcc/gimple-walk.cc:51
0x16a383a walk_gimple_stmt(gimple_stmt_iterator*, tree_node*
(*)(gimple_stmt_iterator*, bool*, walk_stmt_info*), tree_node* (*)(tree_node**,
int*, void*), walk_stmt_info*)
../../gcc-trunk/gcc/gimple-walk.cc:646
0x16a1b46 walk_gimple_seq_mod(gimple**, tree_node* (*)(gimple_stmt_iterator*,
bool*, walk_stmt_info*), tree_node* (*)(tree_node**, int*, void*),
walk_stmt_info*)
../../gcc-trunk/gcc/gimple-walk.cc:51
0x16a383a walk_gimple_stmt(gimple_stmt_iterator*, tree_node*
(*)(gimple_stmt_iterator*, bool*, walk_stmt_info*), tree_node* (*)(tree_node**,
int*, void*), walk_stmt_info*)
../../gcc-trunk/gcc/gimple-walk.cc:646
0x16a1b46 walk_gimple_seq_mod(gimple**, tree_node* (*)(gimple_stmt_iterator*,
bool*, walk_stmt_info*), tree_node* (*)(tree_node**, int*, void*),
walk_stmt_info*)
../../gcc-trunk/gcc/gimple-walk.cc:51
0x1ca1ce1 walk_body
../../gcc-trunk/gcc/tree-nested.cc:825
0x1ca1d24 walk_function
../../gcc-trunk/gcc/tree-nested.cc:836
0x1ca20b4 walk_all_functions
../../gcc-trunk/gcc/tree-nested.cc:901
0x1cad4cd lower_nested_functions(tree_node*)
../../gcc-trunk/gcc/tree-nested.cc:3900
0x13dcab4 cgraph_node::analyze()
../../gcc-trunk/gcc/cgraphunit.cc:696
0x13dee6c analyze_functions
../../gcc-trunk/gcc/cgraphunit.cc:1269
0x13e23d8 symbol_table::finalize_compilation_unit()
../../gcc-trunk/gcc/cgraphunit.cc:2592