[Bug fortran/97694] ICE with optional assumed rank class(*) argument

[mscfd at gmx dot net via Gcc-bugs]

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

--- Comment #5 from martin <mscfd at gmx dot net> ---
Thanks a lot. The patch seems to work great. Tried it with the more complex
code from which the two failed tests were boiled down.