[flang-commits] [flang] [flang][OpenMP] Revert array element reduction lowering (PR #215617)

[Tom Eccles via flang-commits]

================
@@ -903,32 +902,20 @@ static void bindEntryBlockArgs(lower::AbstractConverter &converter,
         // llvm::zip_equal(processedSyms, vars, args) asserts equal lengths.
         // The matching block argument is silently skipped below.
         processedSyms.push_back(nullptr);
-        processedObjects.push_back(nullptr);
         continue;
       }
       if (const auto *commonDet =
               sym->detailsIf<semantics::CommonBlockDetails>()) {
-        for (auto &mem : commonDet->objects()) {
-          processedSyms.push_back(&*mem);
-          processedObjects.push_back(&object);
-        }
+        llvm::transform(commonDet->objects(), std::back_inserter(processedSyms),
+                        [&](const auto &mem) { return &*mem; });
       } else {
         processedSyms.push_back(sym);
-        processedObjects.push_back(&object);
       }
     }
 
-    assert(processedSyms.size() == processedObjects.size());
-    for (auto [sym, var, arg, object] :
-         llvm::zip_equal(processedSyms, vars, args, processedObjects)) {
+    for (auto [sym, var, arg] : llvm::zip_equal(processedSyms, vars, args)) {
----------------
tblah wrote:

Well spotted: https://github.com/llvm/llvm-project/pull/215617/commits/edd20242dc320398745866a4750c67c70fe80701

https://github.com/llvm/llvm-project/pull/215617