]> git.ipfire.org Git - thirdparty/gcc.git/commit
Fortran: fix bounds-checking errors for CLASS array dummies [PR104908]
authorHarald Anlauf <anlauf@gmx.de>
Sat, 27 Jan 2024 16:41:43 +0000 (17:41 +0100)
committerHarald Anlauf <anlauf@gmx.de>
Fri, 9 Feb 2024 19:40:16 +0000 (20:40 +0100)
commitf7b3a82be2f4e9f43524185226c0df686c7b0154
treef8176e0cbfe337821106a091a299e104a5642477
parent6ad83bf128fcede4bdc93142957cc44ea1c7ea7f
Fortran: fix bounds-checking errors for CLASS array dummies [PR104908]

Commit r11-1235 addressed issues with bounds of unlimited polymorphic array
dummies.  However, using the descriptor from sym->backend_decl does break
the case of CLASS array dummies.  The obvious solution is to restrict the
fix to the unlimited polymorphic case, thus keeping the original descriptor
in the ordinary case.

gcc/fortran/ChangeLog:

PR fortran/104908
* trans-array.cc (gfc_conv_array_ref): Restrict use of transformed
descriptor (sym->backend_decl) to the unlimited polymorphic case.

gcc/testsuite/ChangeLog:

PR fortran/104908
* gfortran.dg/pr104908.f90: New test.

(cherry picked from commit ce61de1b8a1bb3a22118e900376f380768f2ba59)
gcc/fortran/trans-array.cc
gcc/testsuite/gfortran.dg/pr104908.f90 [new file with mode: 0644]