[Bug fortran/95089] New: ICE in gfc_get_derived_type, at fortran/trans-types.c:2843

[gscfq@t-online.de]

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

            Bug ID: 95089
           Summary: ICE in gfc_get_derived_type, at
                    fortran/trans-types.c:2843
           Product: gcc
           Version: 11.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

Switches between 57 (ok) and 58 (ICE) :


$ cat z1_57.f90
module m23456789012345678901234567890123456789012345678901234567
   type t23456789012345678901234567890123456789012345678901234567
      type(t23456789012345678901234567890123456789012345678901234567), &
      pointer :: z23456789012345678901234567890123456789012345678901234567
   end type
end


$ cat z1_58.f90
module m234567890123456789012345678901234567890123456789012345678
   type t234567890123456789012345678901234567890123456789012345678
      type(t234567890123456789012345678901234567890123456789012345678), &
      pointer :: z234567890123456789012345678901234567890123456789012345678
   end type
end


$ cat z1_63.f90
module m23456789012345678901234567890123456789012345678901234567890123
   type t23456789012345678901234567890123456789012345678901234567890123
      type(t23456789012345678901234567890123456789012345678901234567890123), &
      pointer ::
z23456789012345678901234567890123456789012345678901234567890123
   end type
end


$ gfortran-11-20200510 -c z1_57.f90 -fcoarray=lib
$ gfortran-11-20200510 -c z1_58.f90 -fcoarray=single
$
$ gfortran-11-20200510 -c z1_58.f90 -fcoarray=lib
f951: internal compiler error: in gfc_get_derived_type, at
fortran/trans-types.c:2843
0x77bbf6 gfc_get_derived_type(gfc_symbol*, int)
        ../../gcc/fortran/trans-types.c:2843
0x77bee8 gfc_typenode_for_spec(gfc_typespec*, int)
        ../../gcc/fortran/trans-types.c:1166
0x77c13e gfc_sym_type(gfc_symbol*)
        ../../gcc/fortran/trans-types.c:2247
0x7208fe gfc_get_symbol_decl(gfc_symbol*)
        ../../gcc/fortran/trans-decl.c:1767
0x723b58 gfc_create_module_variable
        ../../gcc/fortran/trans-decl.c:5297
0x6e2f72 do_traverse_symtree
        ../../gcc/fortran/symbol.c:4147
0x72435b gfc_generate_module_vars(gfc_namespace*)
        ../../gcc/fortran/trans-decl.c:5796
0x6fed94 gfc_generate_module_code(gfc_namespace*)
        ../../gcc/fortran/trans.c:2238
0x6abd11 translate_all_program_units
        ../../gcc/fortran/parse.c:6293
0x6abd11 gfc_parse_file()
        ../../gcc/fortran/parse.c:6545
0x6f7a7f gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:210