================
@@ -4497,6 +4576,22 @@ void OmpStructureChecker::CheckWorkshareBlockStmts(
}
}
+void OmpStructureChecker::CheckWorkdistributeBlockStmts(
+ const parser::Block &block, parser::CharBlock source) {
+ OmpWorkdistributeBlockChecker ompWorkdistributeBlockChecker{context_,
source};
+
+ for (auto it{block.begin()}; it != block.end(); ++it) {
+ if (parser::Unwrap<parser::AssignmentStmt>(*it)) {
+ parser::Walk(*it, ompWorkdistributeBlockChecker);
+ } else {
+ context_.Say(source,
+ "The structured block in a WORKDISTRIBUTE construct may consist of "
+ "only "
+ "SCALAR or ARRAY assignments"_err_en_US);
----------------
skc7 wrote:
Fixed all the error strings concatenations. Also added check for version 6.0
for WORKDISTRIBUTE.
https://github.com/llvm/llvm-project/pull/154377
_______________________________________________
llvm-branch-commits mailing list
llvm-branch-commits@lists.llvm.org
https://lists.llvm.org/cgi-bin/mailman/listinfo/llvm-branch-commits
