[Bug fortran/77971] New: ICE at -O0 in make_decl_rtl, at varasm.c:1310

["gerhard dot steinmetz dot fortran at t-online dot de" <gcc-bugzilla at gcc dot gnu dot org>]

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

            Bug ID: 77971
           Summary: ICE at -O0 in make_decl_rtl, at varasm.c:1310
           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: ---

ICE down to at least 4.8, at -O0 :


$ cat z1.f90
module m
   real g
contains
   function f()
      f = 1
   entry g()
      g = 2
   end
end


$ gfortran-7-20161009 -O0 -c z1.f90
z1.f90:7:0:

       g = 2

internal compiler error: in make_decl_rtl, at varasm.c:1310
0xf1e0be make_decl_rtl(tree_node*)
        ../../gcc/varasm.c:1306
0x90dd88 expand_expr_real_1(tree_node*, rtx_def*, machine_mode,
expand_modifier, rtx_def**, bool)
        ../../gcc/expr.c:9755
0x91a8a6 expand_expr
        ../../gcc/expr.h:279
0x91a8a6 expand_assignment(tree_node*, tree_node*, bool)
        ../../gcc/expr.c:5252
0x8083e6 expand_gimple_stmt_1
        ../../gcc/cfgexpand.c:3649
0x8083e6 expand_gimple_stmt
        ../../gcc/cfgexpand.c:3745
0x80a80e expand_gimple_basic_block
        ../../gcc/cfgexpand.c:5752
0x810996 execute
        ../../gcc/cfgexpand.c:6363