[Bug fortran/93685] New: [9/10 Regression] ICE in gfc_constructor_append_expr, at fortran/constructor.c:135

[gscfq@t-online.de]

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

            Bug ID: 93685
           Summary: [9/10 Regression] ICE in gfc_constructor_append_expr,
                    at fortran/constructor.c:135
           Product: gcc
           Version: 10.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

Changed between 20180513 and 20180527 :


$ cat z1.f90
program p
   type t
      character :: a
   end type
   type(t) :: x
   character, target :: c = 'c'
   data x%a /c/
end


$ gfortran-9-20180513 -c z1.f90
z1.f90:7:14:

    data x%a /c/
              1
Error: Symbol 'c' must be a PARAMETER in DATA statement at (1)


$ gfortran-10-20200209 -c z1.f90
f951: internal compiler error: Segmentation fault
0xbae4bf crash_signal
        ../../gcc/toplev.c:328
0x62f28b gfc_constructor_append_expr(splay_tree_s**, gfc_expr*, locus*)
        ../../gcc/fortran/constructor.c:135
0x63102c formalize_structure_cons
        ../../gcc/fortran/data.c:645
0x63102c formalize_init_expr
        ../../gcc/fortran/data.c:682
0x6df832 do_traverse_symtree
        ../../gcc/fortran/symbol.c:4146
0x6b77a3 resolve_types
        ../../gcc/fortran/resolve.c:17150
0x6bb34c gfc_resolve(gfc_namespace*)
        ../../gcc/fortran/resolve.c:17237
0x6a96bc resolve_all_program_units
        ../../gcc/fortran/parse.c:6245
0x6a96bc gfc_parse_file()
        ../../gcc/fortran/parse.c:6492
0x6f42bf gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:210