[Bug fortran/87359] [9.0 regression] pointer being freed was not allocated

[juergen.reuter at desy dot de]

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

--- Comment #3 from Jürgen Reuter <juergen.reuter at desy dot de> ---
This is a first (rather lengthy) reproducer. I still try to cut it out further.