[Bug fortran/89365] Inquiry functions for assumed rank objects fail

[Bader at lrz dot de]

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

--- Comment #5 from Bader at lrz dot de <Bader at lrz dot de> ---
The corrected test case passes all tests, so the PR can be closed. Sorry for
the noise.