[flang-commits] [flang] [flang] Add parsing of DO CONCURRENT REDUCE clause (PR #92518)
Peter Klausler via flang-commits
flang-commits at lists.llvm.org
Thu May 30 08:21:59 PDT 2024
================
@@ -6866,18 +6887,21 @@ bool ConstructVisitor::Pre(const parser::ConcurrentHeader &header) {
bool ConstructVisitor::Pre(const parser::LocalitySpec::Local &x) {
for (auto &name : x.v) {
- if (auto *symbol{DeclareLocalEntity(name)}) {
- symbol->set(Symbol::Flag::LocalityLocal);
- }
+ DeclareLocalEntity(name, Symbol::Flag::LocalityLocal);
}
return false;
}
bool ConstructVisitor::Pre(const parser::LocalitySpec::LocalInit &x) {
for (auto &name : x.v) {
- if (auto *symbol{DeclareLocalEntity(name)}) {
- symbol->set(Symbol::Flag::LocalityLocalInit);
- }
+ DeclareLocalEntity(name, Symbol::Flag::LocalityLocalInit);
+ }
+ return false;
+}
+
+bool ConstructVisitor::Pre(const parser::LocalitySpec::Reduce &x) {
+ for (auto &name : std::get<std::list<parser::Name>>(x.t)) {
----------------
klausler wrote:
`const auto &name`
https://github.com/llvm/llvm-project/pull/92518
More information about the flang-commits
mailing list