[Bug fortran/95829] New: Bogus error with additional blanks in type(*)

[gscfq@t-online.de]

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

            Bug ID: 95829
           Summary: Bogus error with additional blanks in type(*)
           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: ---

Affects versions down to at least r5 :


$ cat z1.f90
subroutine s(x)
   type( * ) :: x
end


$ cat z2.f90
subroutine s (a, b, c, d, e, f, g)
   type(*) :: a
   type(* ) :: b
   type( *) :: c
   type( * ) :: d
   type(*  ) :: e
   type(  *) :: f
   type(  *  ) :: g
end


$ gfortran-11-20200621 -c z1.f90
z1.f90:2:4:

    2 |    type( * ) :: x
      |    1
Error: Unclassifiable statement at (1)