[llvm-branch-commits] [flang] [flang][OpenMP] Check if loop nest/sequence is well-formed (PR #188025)

[Michael Kruse via llvm-branch-commits]

================
@@ -1326,4 +1334,64 @@ LoopSequence::Depth LoopSequence::getNestedDepths() const {
   }
   return children_.front().depth_;
 }
+
+static bool IsDoConcurrent(const parser::ExecutionPartConstruct &x) {
+  if (auto *loop{parser::Unwrap<parser::DoConstruct>(x)}) {
+    return loop->IsDoConcurrent();
+  }
+  return false;
+}
+
+static Reason whyNotWellFormed(
----------------
Meinersbur wrote:

`IsDoConcurrent`, `whyNotWellFormed`: Two static function, one starting with a capital letter, the other with lower case. 

I do not quite get https://flang.llvm.org/docs/C++style.html#naming, but at least one of them is wrong

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