Mentions légales du service

Skip to content
Snippets Groups Projects
Commit ed6563d9 authored by Thierry's avatar Thierry
Browse files

[fix] add concurrent as an alias of cw; add commute for StarPU related commute

parent 6befe6ec
Branches
No related tags found
No related merge requests found
......@@ -348,6 +348,8 @@ OPENMP_AFFINITY_KIND(thread)
OPENMP_DEPEND_KIND(in)
OPENMP_DEPEND_KIND(out)
OPENMP_DEPEND_KIND(inout)
OPENMP_DEPEND_KIND(concurrent)
OPENMP_DEPEND_KIND(commute)
OPENMP_DEPEND_KIND(cw)
OPENMP_DEPEND_KIND(source)
OPENMP_DEPEND_KIND(sink)
......
......@@ -4032,7 +4032,7 @@ void CGOpenMPRuntime::emitTaskCall(CodeGenFunction &CGF, SourceLocation Loc,
unsigned NumDependencies = Data.Dependences.size();
if (NumDependencies) {
// Dependence kind for RTL.
enum RTLDependenceKindTy { DepIn = 0x01, DepOut = 0x02, DepInOut = 0x3, DepCW = 0x04 };
enum RTLDependenceKindTy { DepIn = 0x01, DepOut = 0x02, DepInOut = 0x3, DepCW = 0x04, DepCommute = 0x08 };
enum RTLDependInfoFieldsTy { BaseAddr, Len, Flags };
RecordDecl *KmpDependInfoRD;
QualType FlagsTy =
......@@ -4096,8 +4096,12 @@ void CGOpenMPRuntime::emitTaskCall(CodeGenFunction &CGF, SourceLocation Loc,
case OMPC_DEPEND_inout:
DepKind = DepInOut;
break;
case OMPC_DEPEND_concurrent:
case OMPC_DEPEND_cw:
DepKind = DepCW;
DepKind = RTLDependenceKindTy(int(DepCW)|int(DepInOut));
break;
case OMPC_DEPEND_commute:
DepKind = RTLDependenceKindTy(int(DepCommute)|int(DepInOut));
break;
case OMPC_DEPEND_source:
case OMPC_DEPEND_sink:
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment