[Bug fortran/66056] Segmentation fault for lonely label in type

[gerhard.steinmetz.fortran@t-online.de]

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

--- Comment #4 from Gerhard Steinmetz <gerhard.steinmetz.fortran@t-online.de> ---
These two do not circle around,


$ cat y1.f90
program p
   type t
      integer :: n = 1
      1 !
      2 !
   end type
   type(t) :: a
   print *, a
end


$ cat y2.f90
program p
   type t
      integer :: n = 1
      ; 1 ;
      ; 2 ;
   end type
   type(t) :: a
   print *, a
end


but answer :
f951: internal compiler error: insert_bbt(): Duplicate key found!