[Bug fortran/88871] [9 regression] ICE segmentation fault in f951

[juergen.reuter at desy dot de]

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

--- Comment #12 from Jürgen Reuter <juergen.reuter at desy dot de> ---
I can also confirm that with the provided patch our code completely compiles,
and all tests work.