[flang-commits] [flang] [flang] Lower REDUCE intrinsic for reduction op with args by value (PR #95353)

[Valentin Clement バレンタイン クレメン via flang-commits]

================
@@ -5745,6 +5745,14 @@ IntrinsicLibrary::genReduce(mlir::Type resultType,
   int rank = arrayTmp.rank();
   assert(rank >= 1);
 
+  // Arguements to the reduction operation are passed by reference or value?
+  bool argByRef = true;
+  if (auto embox =
+          mlir::dyn_cast_or_null<fir::EmboxProcOp>(operation.getDefiningOp())) {
----------------
clementval wrote:

So it works but there is I need to check for the dummy procedure by value because the information is lost in FIR. I'll prepare a follow up patch and we can discuss on it. 

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