Fortran: extend check for array arguments and reject CLASS array elements.
authorHarald Anlauf <anlauf@gmx.de>
Fri, 23 Jul 2021 19:00:10 +0000 (21:00 +0200)
committerHarald Anlauf <anlauf@gmx.de>
Fri, 23 Jul 2021 19:00:10 +0000 (21:00 +0200)
commite314cfc371d8b2405a1d81e51b90f9fb24b9061f
treeae1984984da4e2a388f75df3c1aef5efc8594c0a
parent8408d34570c9fe9f3d22a25a76df2a4c64f08477
Fortran: extend check for array arguments and reject CLASS array elements.

gcc/fortran/ChangeLog:

PR fortran/101536
* check.c (array_check): Adjust check for the case of CLASS
arrays.

gcc/testsuite/ChangeLog:

PR fortran/101536
* gfortran.dg/pr101536.f90: New test.
gcc/fortran/check.c
gcc/testsuite/gfortran.dg/pr101536.f90 [new file with mode: 0644]