[Bug fortran/123253] [16 regression] rejection of valid code

[juergen.reuter at desy dot de]

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

--- Comment #4 from Jürgen Reuter <juergen.reuter at desy dot de> ---
Potentially introduced by this commit here:
a30b5f23b58b236207e59635cf7e9504c603f376