[flang] Allow a construct entity as a concurrent-header index
authorPeter Klausler <pklausler@nvidia.com>
Thu, 25 Aug 2022 17:19:20 +0000 (10:19 -0700)
committerPeter Klausler <pklausler@nvidia.com>
Thu, 25 Aug 2022 21:55:22 +0000 (14:55 -0700)
commitaef6b15744f7a204fb04903a2b7d08f9dda14a8c
treeffc1506148352651de2cf0090e59a5adb381346d
parentf75033a0588a05b0077ad8fedb1dad6f466558c0
[flang] Allow a construct entity as a concurrent-header index

A construct entity of an ASSOCIATE or SELECT TYPE construct
should be acceptable as an index variable of a concurrent-header in
a FORALL or DO CONCURRENT, so long as it also satisfies other
requirements.

Differential Revision: https://reviews.llvm.org/D132681
flang/lib/Semantics/resolve-names.cpp
flang/test/Semantics/forall01.f90