[Bug fortran/84432] [F08] Detect illegal component initialization in pdt_27.f03

[neil.n.carlson at gmail dot com]

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

--- Comment #6 from Neil Carlson <neil.n.carlson at gmail dot com> ---
... and this would also be invalid

   type t(a)
      integer, len :: a = 3
      character(len=a) :: c = 'foo'
   end type