]> git.ipfire.org Git - thirdparty/gcc.git/commit
Fortran: fix invalid rank error in ASSOCIATED when rank is remapped [PR77652]
authorHarald Anlauf <anlauf@gmx.de>
Wed, 27 Jul 2022 19:34:22 +0000 (21:34 +0200)
committerHarald Anlauf <anlauf@gmx.de>
Sun, 31 Jul 2022 18:28:38 +0000 (20:28 +0200)
commit0110cfd5449bae3a772f45ea2e4c5dab5b7a8ccd
tree297d550a3369382d8bda6a68bb15bc28f489bcb6
parentb04c399e258e686dddad879bf7e27d9e28fd6fde
Fortran: fix invalid rank error in ASSOCIATED when rank is remapped [PR77652]

gcc/fortran/ChangeLog:

PR fortran/77652
* check.cc (gfc_check_associated): Make the rank check of POINTER
vs. TARGET match the allowed forms of pointer assignment for the
selected Fortran standard.

gcc/testsuite/ChangeLog:

PR fortran/77652
* gfortran.dg/associated_target_9a.f90: New test.
* gfortran.dg/associated_target_9b.f90: New test.
gcc/fortran/check.cc
gcc/testsuite/gfortran.dg/associated_target_9a.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/associated_target_9b.f90 [new file with mode: 0644]