[Bug fortran/71884] New: ICE in gfc_trans_allocate, at fortran/trans-stmt.c:5582 and :5698

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

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

            Bug ID: 71884
           Summary: ICE in gfc_trans_allocate, at
                    fortran/trans-stmt.c:5582 and :5698
           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: ---

With these snippets :


$ cat z1.f90
program p
   class(*), allocatable :: x
   allocate (x, source=null())
end


$ cat z2.f90
program p
   class(*), allocatable :: x
   allocate (x, mold=null())
end


$ gfortran-6 z2.f90
z2.f90:3:0:

    allocate (x, mold=null())

internal compiler error: in gfc_trans_allocate, at fortran/trans-stmt.c:5573


$ gfortran-7-20160710 z2.f90
z2.f90:3:0:

    allocate (x, mold=null())

internal compiler error: in gfc_trans_allocate, at fortran/trans-stmt.c:5582
0x7a1d26 gfc_trans_allocate(gfc_code*)
        ../../gcc/fortran/trans-stmt.c:5582
0x71bf87 trans_code
        ../../gcc/fortran/trans.c:1838
0x74ac88 gfc_generate_function_code(gfc_namespace*)
        ../../gcc/fortran/trans-decl.c:6171
0x6d6860 translate_all_program_units
        ../../gcc/fortran/parse.c:5914
0x6d6860 gfc_parse_file()
        ../../gcc/fortran/parse.c:6120
0x718d12 gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:198