[flang] Accept an assumed-rank array as operand of ASSOCIATED()
authorPeter Klausler <pklausler@nvidia.com>
Mon, 17 Jul 2023 16:42:47 +0000 (09:42 -0700)
committerPeter Klausler <pklausler@nvidia.com>
Fri, 21 Jul 2023 16:47:14 +0000 (09:47 -0700)
commit8eb2206197a31290e33a0e4a4a5d0010c176e31e
tree64c0110018bd82e353069bcd08c804ae3182c086
parent0517a9cae90fafbc36267a81df40ce4eef73eb30
[flang] Accept an assumed-rank array as operand of ASSOCIATED()

The ASSOCIATED() intrinsic was mistakenly defined in the intrinsic
function table as requiring operands of known rank, which unintentionally
prevented assumed-rank dummy arguments from being tested.

Fixes llvm-test-suite/Fortran/gfortran/regression/pr88932.f90.

Differential Revision: https://reviews.llvm.org/D155498
flang/lib/Evaluate/intrinsics.cpp
flang/test/Semantics/associated.f90