[Bug fortran/83275] New: [PDT] ICE in get_pdt_constructor, at fortran/resolve.c:1185 (and others)

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

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

            Bug ID: 83275
           Summary: [PDT] ICE in get_pdt_constructor, at
                    fortran/resolve.c:1185 (and others)
           Product: gcc
           Version: 8.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

Related to pr83274, in order to avoid an overloaded PR.
According to f2008 4.5.3.1 and 1.4.3, a type-param-name-list in
a PDT definition statement should have at least one element (name).


$ cat z1.f90
program p
   type t()
   end type
   data x /t()/
end


$ gfortran-8-20171203 -c z1.f90
f951: internal compiler error: in get_pdt_constructor, at
fortran/resolve.c:1185
0x6f7d0f get_pdt_constructor
        ../../gcc/fortran/resolve.c:1185
0x70e1de resolve_structure_cons
        ../../gcc/fortran/resolve.c:1247
0x6fe629 gfc_resolve_expr(gfc_expr*)
        ../../gcc/fortran/resolve.c:6763
0x69b55f gfc_reduce_init_expr(gfc_expr*)
        ../../gcc/fortran/expr.c:2696
0x6f5ab7 gfc_match_structure_constructor(gfc_symbol*, gfc_expr**)
        ../../gcc/fortran/primary.c:3039
0x682c7c match_data_constant
        ../../gcc/fortran/decl.c:412
0x682d66 top_val_list
        ../../gcc/fortran/decl.c:457
0x682f99 gfc_match_data()
        ../../gcc/fortran/decl.c:586
0x6e6059 match_word_omp_simd
        ../../gcc/fortran/parse.c:93
0x6eaa7f match_word
        ../../gcc/fortran/parse.c:467
0x6eaa7f decode_statement
        ../../gcc/fortran/parse.c:467
0x6eb544 next_free
        ../../gcc/fortran/parse.c:1225
0x6eb544 next_statement
        ../../gcc/fortran/parse.c:1457
0x6ece2c parse_spec
        ../../gcc/fortran/parse.c:3835
0x6ef323 parse_progunit
        ../../gcc/fortran/parse.c:5638
0x6f08e4 gfc_parse_file()
        ../../gcc/fortran/parse.c:6178
0x73537f gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:204