[PATCH, committed] PR 89639, fix testcase for targets without REAL128

[FX]

Attached patch pushed as cb48166e52c0f159eb80a0666c4847825e294ec0
Confirmed by Dave to make the testcase pass on hppa-unknown-linux-gnu

FX

-------------- next part --------------
A non-text attachment was scrubbed...
Name: 0001-Fortran-Fix-test-on-targets-without-REAL128.patch
Type: application/octet-stream
Size: 4090 bytes
Desc: not available
URL: <https://gcc.gnu.org/pipermail/fortran/attachments/20211231/e446d13e/attachment.obj>