[Bug fortran/77680] New: ICE in ctor_for_folding, at varpool.c:419

[gerhard.steinmetz.fortran@t-online.de]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=77680

            Bug ID: 77680
           Summary: ICE in ctor_for_folding, at varpool.c:419
           Product: gcc
           Version: 7.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gerhard.steinmetz.fortran@t-online.de
  Target Milestone: ---

Another issue with default initialization (used for testing only).
Affects versions 5, 6 and 7, at -Og, -Os, -O1 or higher.


$ cat z1.f90
program p
   bind(c) :: x
   call s(x)
end


$ /home/gst/gcc/gcc-7-20160918-oyd/bin/gfortran -O2 -finit-real=zero -c z1.f90
z1.f90:4:0:

 end

internal compiler error: in ctor_for_folding, at varpool.c:419
0xf18192 ctor_for_folding(tree_node*)
        ../../gcc/varpool.c:419
0xdd4842 fully_constant_vn_reference_p(vn_reference_s*)
        ../../gcc/tree-ssa-sccvn.c:1377
0xdd998f vn_reference_lookup(tree_node*, tree_node*, vn_lookup_kind,
vn_reference_s**, bool)
        ../../gcc/tree-ssa-sccvn.c:2431
0xddcec6 visit_reference_op_store
        ../../gcc/tree-ssa-sccvn.c:3583
0xddcec6 visit_use
        ../../gcc/tree-ssa-sccvn.c:3831
0xddeb6b process_scc
        ../../gcc/tree-ssa-sccvn.c:4073
0xddeb6b extract_and_process_scc_for_name
        ../../gcc/tree-ssa-sccvn.c:4160
0xddeb6b DFS
        ../../gcc/tree-ssa-sccvn.c:4212
0xddf3dd sccvn_dom_walker::before_dom_children(basic_block_def*)
        ../../gcc/tree-ssa-sccvn.c:4678
0x1299da2 dom_walker::walk(basic_block_def*)
        ../../gcc/domwalk.c:265
0xde01f2 run_scc_vn(vn_lookup_kind)
        ../../gcc/tree-ssa-sccvn.c:4789
0xdb0b54 execute
        ../../gcc/tree-ssa-pre.c:5126