[flang-commits] [flang] [Flang][OpenMP] Correct ArrayElements in Reduction Clause (PR #196094)

[Tom Eccles via flang-commits]

================
@@ -75,6 +75,20 @@ static void processHostEvalClauses(lower::AbstractConverter &converter,
                                    mlir::Location loc);
 
 namespace {
+static bool isReductionObjectExpression(const Object *object) {
+  if (!object || !object->ref())
+    return false;
+  const SomeExpr &expr = *object->ref();
+  return evaluate::IsArrayElement(expr);
+}
+
+static std::optional<const SomeExpr *>
+getReductionObjectExpr(const Object *object) {
----------------
tblah wrote:

nit: name

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