[Bug fortran/84122] Incorrect statement sequence in PDT definition

["kargl at gcc dot gnu.org" <gcc-bugzilla at gcc dot gnu dot org>]

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

kargl at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |kargl at gcc dot gnu.org

--- Comment #2 from kargl at gcc dot gnu.org ---
This needs to be addressed in parse.c at lines 3281-3283:

        case ST_PROCEDURE:
          accept_statement (st);
          seen_component = 1;

The accepted statement needs to be checked to see if it
is a type-param-def-stmt.  If it is then seen_component
may be 0 and left unchanged.  I suspect that we'll need
to add seen_type_param_len and seen_type_param_kind to
skip the error that is printed later.