[flang-commits] [flang] [flang][OpenMP] Add semantic check for target construct (PR #73697)

[via flang-commits]

================
@@ -2653,6 +2654,20 @@ void OmpStructureChecker::Enter(const parser::OmpClause::If &x) {
   }
 }
 
+void OmpStructureChecker::Enter(const parser::Call &c) {
+  const parser::Name *name =
+      std::get_if<parser::Name>(&std::get<parser::ProcedureDesignator>(c.t).u);
+  llvm::StringSet rtlfns{"omp_set_default_device", "omp_get_default_device",
----------------
shraiysh wrote:

I'll do it in the next version of this patch

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