[PATCH, committed] Fortran: fix wrong array bounds check [PR113471]

[Harald Anlauf]

Dear all,

I've pushed the attached obvious patch for a regression due to a
wrong array bounds check after regtesting on x86_64-pc-linux-gnu
and verification of the fix by the reporter in the PR.

https://gcc.gnu.org/g:94b2e6cb1cc4feb122bf77f19a657c97bffa9b42

Thanks,
Harald

-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr113471.diff
Type: text/x-patch
Size: 2247 bytes
Desc: not available
URL: <https://gcc.gnu.org/pipermail/fortran/attachments/20240119/37f0e459/attachment-0001.bin>