[Bug fortran/99139] New: ICE: gfc_get_default_type(): Bad symbol '__tmp_UNKNOWN_0_rank_1'

["gscfq@t-online.de" <gcc-bugzilla@gcc.gnu.org>]

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

            Bug ID: 99139
           Summary: ICE: gfc_get_default_type(): Bad symbol
                    '__tmp_UNKNOWN_0_rank_1'
           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: ---

Started between 20190825 and 20190901 :


$ cat z1.f90
subroutine s(x)
   target :: x(..)
   select rank (y => x)
   rank (1)
   rank (2)
   end select
end


$ gfortran-11-20210214 -c z1.f90
f951: internal compiler error: gfc_get_default_type(): Bad symbol
'__tmp_UNKNOWN_0_rank_1'
0x687519 gfc_report_diagnostic
        ../../gcc/fortran/error.c:782
0x688c3a gfc_internal_error(char const*, ...)
        ../../gcc/fortran/error.c:1402
0x7206dc gfc_get_default_type(char const*, gfc_namespace*)
        ../../gcc/fortran/symbol.c:239
0x724408 gfc_set_default_type(gfc_symbol*, int, gfc_namespace*)
        ../../gcc/fortran/symbol.c:298
0x6ff33c resolve_symbol
        ../../gcc/fortran/resolve.c:15380
0x71e2c2 do_traverse_symtree
        ../../gcc/fortran/symbol.c:4170
0x702bb4 resolve_types
        ../../gcc/fortran/resolve.c:17296
0x6fe22c gfc_resolve(gfc_namespace*)
        ../../gcc/fortran/resolve.c:17411
0x6fd667 gfc_resolve(gfc_namespace*)
        ../../gcc/fortran/resolve.c:11720
0x6fd667 resolve_select_rank
        ../../gcc/fortran/resolve.c:9717
0x6fd667 gfc_resolve_code(gfc_code*, gfc_namespace*)
        ../../gcc/fortran/resolve.c:12055
0x6fe177 resolve_codes
        ../../gcc/fortran/resolve.c:17378
0x6fe23e gfc_resolve(gfc_namespace*)
        ../../gcc/fortran/resolve.c:17413
0x6e6784 resolve_all_program_units
        ../../gcc/fortran/parse.c:6290
0x6e6784 gfc_parse_file()
        ../../gcc/fortran/parse.c:6542
0x7330ff gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:212