[Bug fortran/93686] [9/10 Regression] ICE in gfc_match_data, at fortran/decl.c:702

[gscfq@t-online.de]

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

G. Steinmetz <gscfq@t-online.de> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |ice-on-invalid-code

--- Comment #1 from G. Steinmetz <gscfq@t-online.de> ---

Additional test cases :


$ cat z2.f90
program p
   type t
      integer :: a = 1
   end type
   type(t), pointer :: x
   data x /t(2)/
end


$ cat z3.f90
program p
   type t
   end type
   type(t), pointer :: x
   data x /t()/
end


$ cat z4.f90
type t
end type
type(t), pointer :: x
data x /
end