[Mlir-commits] [flang] [mlir] [flang][OpenMP] Support for "omp assumes no_openmp". (PR #233252)

[Krzysztof Parzyszek]

================
@@ -6507,6 +6509,28 @@ class FirConverter : public Fortran::lower::AbstractConverter {
     builder->setFPMaxminBehavior(
         bridge.getLoweringOptions().getFPMaxminBehavior());
     builder->setInsertionPointToStart(&func.front());
+    const auto &langOptions = bridge.getSemanticsContext().langOptions();
+    const auto *assumptionScopeEnd =
+        langOptions.getOpenMPVersion() >= 60
+            ? &Fortran::semantics::omp::GetProgramUnit(scope).parent()
+            : nullptr;
+    for (const auto *assumptionScope = &scope;
+         !langOptions.OpenMPSimd && !assumptionScope->IsGlobal() &&
----------------
kparzysz wrote:

`langOptions.OpenMPSimd` would be just an early return (see the comment below).

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