[Bug fortran/88488] New: ICE in gfc_trans_array_constructor_subarray, at fortran/trans-array.c:1646

["gscfq at t-online dot de" <gcc-bugzilla at gcc dot gnu dot org>]

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

            Bug ID: 88488
           Summary: ICE in gfc_trans_array_constructor_subarray, at
                    fortran/trans-array.c:1646
           Product: gcc
           Version: 9.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

Affects versions down to at least gfortran-5 :


$ cat z1.f90
program p
   type t
      integer :: n = 789
   end type
   type(t), parameter :: a(2) = t()
   type(t) :: b(2)
   b = [a]
end


$ gfortran-9-20181209 -c z1.f90
z1.f90:7:0:

    7 |    b = [a]
      |
internal compiler error: in gfc_trans_array_constructor_subarray, at
fortran/trans-array.c:1646
0x6daccd gfc_trans_array_constructor_subarray
        ../../gcc/fortran/trans-array.c:1646
0x6daccd gfc_trans_array_constructor_value
        ../../gcc/fortran/trans-array.c:1774
0x6d279c trans_array_constructor
        ../../gcc/fortran/trans-array.c:2558
0x6d279c gfc_add_loop_ss_code
        ../../gcc/fortran/trans-array.c:2835
0x6d2e65 gfc_conv_loop_setup(gfc_loopinfo*, locus*)
        ../../gcc/fortran/trans-array.c:5129
0x6ff8db gfc_trans_assignment_1
        ../../gcc/fortran/trans-expr.c:10208
0x6c278f trans_code
        ../../gcc/fortran/trans.c:1822
0x6ea054 gfc_generate_function_code(gfc_namespace*)
        ../../gcc/fortran/trans-decl.c:6509
0x6765c6 translate_all_program_units
        ../../gcc/fortran/parse.c:6128
0x6765c6 gfc_parse_file()
        ../../gcc/fortran/parse.c:6331
0x6bf27f gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:204