[OPENMP] Initial parsing and sema analysis for 'taskwait' directive.
llvm-svn: 213363
diff --git a/clang/lib/Sema/SemaOpenMP.cpp b/clang/lib/Sema/SemaOpenMP.cpp
index eeb4fbd..f2421da 100644
--- a/clang/lib/Sema/SemaOpenMP.cpp
+++ b/clang/lib/Sema/SemaOpenMP.cpp
@@ -1052,6 +1052,14 @@
Params);
break;
}
+ case OMPD_taskwait: {
+ Sema::CapturedParamNameType Params[] = {
+ std::make_pair(StringRef(), QualType()) // __context with shared vars
+ };
+ ActOnCapturedRegionStart(DSAStack->getConstructLoc(), CurScope, CR_OpenMP,
+ Params);
+ break;
+ }
case OMPD_threadprivate:
llvm_unreachable("OpenMP Directive is not allowed");
case OMPD_unknown:
@@ -1078,6 +1086,7 @@
// | parallel | task | * |
// | parallel | taskyield | * |
// | parallel | barrier | * |
+ // | parallel | taskwait | * |
// +------------------+-----------------+------------------------------------+
// | for | parallel | * |
// | for | for | + |
@@ -1091,6 +1100,7 @@
// | for | task | * |
// | for | taskyield | * |
// | for | barrier | + |
+ // | for | taskwait | * |
// +------------------+-----------------+------------------------------------+
// | master | parallel | * |
// | master | for | + |
@@ -1104,6 +1114,7 @@
// | master | task | * |
// | master | taskyield | * |
// | master | barrier | + |
+ // | master | taskwait | * |
// +------------------+-----------------+------------------------------------+
// | simd | parallel | |
// | simd | for | |
@@ -1117,6 +1128,7 @@
// | simd | task | |
// | simd | taskyield | |
// | simd | barrier | |
+ // | simd | taskwait | |
// +------------------+-----------------+------------------------------------+
// | sections | parallel | * |
// | sections | for | + |
@@ -1130,6 +1142,7 @@
// | sections | task | * |
// | sections | taskyield | * |
// | sections | barrier | + |
+ // | sections | taskwait | * |
// +------------------+-----------------+------------------------------------+
// | section | parallel | * |
// | section | for | + |
@@ -1143,6 +1156,7 @@
// | section | task | * |
// | section | taskyield | * |
// | section | barrier | + |
+ // | section | taskwait | * |
// +------------------+-----------------+------------------------------------+
// | single | parallel | * |
// | single | for | + |
@@ -1156,6 +1170,7 @@
// | single | task | * |
// | single | taskyield | * |
// | single | barrier | + |
+ // | single | taskwait | * |
// +------------------+-----------------+------------------------------------+
// | parallel for | parallel | * |
// | parallel for | for | + |
@@ -1169,6 +1184,7 @@
// | parallel for | task | * |
// | parallel for | taskyield | * |
// | parallel for | barrier | + |
+ // | parallel for | taskwait | * |
// +------------------+-----------------+------------------------------------+
// | parallel sections| parallel | * |
// | parallel sections| for | + |
@@ -1182,6 +1198,7 @@
// | parallel sections| task | * |
// | parallel sections| taskyield | * |
// | parallel sections| barrier | + |
+ // | parallel sections| taskwait | * |
// +------------------+-----------------+------------------------------------+
// | task | parallel | * |
// | task | for | + |
@@ -1195,6 +1212,7 @@
// | task | task | * |
// | task | taskyield | * |
// | task | barrier | + |
+ // | task | taskwait | * |
// +------------------+-----------------+------------------------------------+
if (Stack->getCurScope()) {
auto ParentRegion = Stack->getParentDirective();
@@ -1351,6 +1369,13 @@
"No associated statement allowed for 'omp barrier' directive");
Res = ActOnOpenMPBarrierDirective(StartLoc, EndLoc);
break;
+ case OMPD_taskwait:
+ assert(ClausesWithImplicit.empty() &&
+ "No clauses are allowed for 'omp taskwait' directive");
+ assert(AStmt == nullptr &&
+ "No associated statement allowed for 'omp taskwait' directive");
+ Res = ActOnOpenMPTaskwaitDirective(StartLoc, EndLoc);
+ break;
case OMPD_threadprivate:
llvm_unreachable("OpenMP Directive is not allowed");
case OMPD_unknown:
@@ -2104,6 +2129,11 @@
return OMPBarrierDirective::Create(Context, StartLoc, EndLoc);
}
+StmtResult Sema::ActOnOpenMPTaskwaitDirective(SourceLocation StartLoc,
+ SourceLocation EndLoc) {
+ return OMPTaskwaitDirective::Create(Context, StartLoc, EndLoc);
+}
+
OMPClause *Sema::ActOnOpenMPSingleExprClause(OpenMPClauseKind Kind, Expr *Expr,
SourceLocation StartLoc,
SourceLocation LParenLoc,