https://gcc.gnu.org/bugzilla/show_bug.cgi?id=107075
Bug ID: 107075 Summary: ICE in get, at cgraph.h:461 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: --- Affects versions down to at least r5 : (both valid, works without block construct) $ cat z1.f90 program p implicit none integer, target :: a(3) block integer, pointer :: z => a(2) a = [1, 2, 3] z = 7 print *, a, z end block end $ cat z2.f90 program p implicit none integer, target :: a(3) integer, pointer :: z => a(2) a = [1, 2, 3] z = 7 print *, a, z end $ gfortran-13-20220925 z2.f90 && ./a.out 1 7 3 7 $ gfortran-13-20220925 -c z1.f90 f951: internal compiler error: in get, at cgraph.h:461 0x131212f symtab_node::get(tree_node const*) ../../gcc/cgraph.h:458 0x131212f varpool_node::get(tree_node const*) ../../gcc/cgraph.h:2785 0x131212f varpool_node::get_create(tree_node*) ../../gcc/varpool.cc:145 0xa1e20f record_reference ../../gcc/cgraphbuild.cc:82 0x12ad193 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/tree.cc:11249 0xa1ecb5 record_references_in_initializer(tree_node*, bool) ../../gcc/cgraphbuild.cc:386 0x1313037 varpool_node::analyze() ../../gcc/varpool.cc:537 0xa2506e analyze_functions ../../gcc/cgraphunit.cc:1294 0xa2624d symbol_table::finalize_compilation_unit() ../../gcc/cgraphunit.cc:2500