[flang-commits] [flang] [flang] Define CO_REDUCE intrinsic procedure (PR #125115)

[Jean-Didier PAILLEUX via flang-commits]

================
@@ -1450,6 +1450,17 @@ static const IntrinsicInterface intrinsicSubroutine[]{
             {"errmsg", DefaultChar, Rank::scalar, Optionality::optional,
                 common::Intent::InOut}},
         {}, Rank::elemental, IntrinsicClass::collectiveSubroutine},
+    {"co_reduce",
+        {{"a", AnyData, Rank::anyOrAssumedRank, Optionality::required,
----------------
JDPailleux wrote:

Ok, in that case I agree. I'll update that.

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