Skip to content

[llvm][OpenMP] Add "SourceLanguages" property to Directive #139960

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
kparzysz merged 3 commits into from
May 15, 2025
Merged

[llvm][OpenMP] Add "SourceLanguages" property to Directive #139960

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
3 commits
Select commit Hold shift + click to select a range
82d0e1f
[ADT] Add operator! to BitmaskEnum
kparzysz May 14, 2025
44fdb32
[llvm][OpenMP] Add "SourceLanguages" property to Directive
kparzysz May 14, 2025
a397c09
Merge branch 'main' into users/kparzysz/spr/n02-tablegen-lang
kparzysz May 15, 2025
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
12 changes: 12 additions & 0 deletions llvm/include/llvm/Frontend/Directive/DirectiveBase.td
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -172,6 +172,15 @@ def CA_Meta: Category<"Meta"> {}
def CA_Subsidiary: Category<"Subsidiary"> {}
def CA_Utility: Category<"Utility"> {}

class SourceLanguage<string n> {
string name = n; // Name of the enum value in enum class Association.
}

// The C languages also implies C++ until there is a reason to add C++
// separately.
def L_C : SourceLanguage<"C"> {}
def L_Fortran : SourceLanguage<"Fortran"> {}

// Information about a specific directive.
class Directive<string d> {
// Name of the directive. Can be composite directive sepearted by whitespace.
Expand Down Expand Up @@ -205,4 +214,7 @@ class Directive<string d> {

// The category of the directive.
Category category = ?;

// The languages that allow this directive. Default: all languages.
list<SourceLanguage> languages = [L_C, L_Fortran];
}
82 changes: 63 additions & 19 deletions llvm/include/llvm/Frontend/OpenMP/OMP.td
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -573,6 +573,7 @@ def OMP_Allocators : Directive<"allocators"> {
];
let association = AS_Block;
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_Assumes : Directive<"assumes"> {
let association = AS_None;
Expand All @@ -586,10 +587,6 @@ def OMP_Assumes : Directive<"assumes"> {
VersionedClause<OMPC_NoParallelism, 51>,
];
}
def OMP_EndAssumes : Directive<"end assumes"> {
let association = AS_Delimited;
let category = OMP_Assumes.category;
}
def OMP_Assume : Directive<"assume"> {
let association = AS_Block;
let category = CA_Informational;
Expand Down Expand Up @@ -637,6 +634,12 @@ def OMP_BeginAssumes : Directive<"begin assumes"> {
VersionedClause<OMPC_NoOpenMPRoutines, 51>,
VersionedClause<OMPC_NoParallelism, 51>,
];
let languages = [L_C];
}
def OMP_EndAssumes : Directive<"end assumes"> {
let association = AS_Delimited;
let category = OMP_BeginAssumes.category;
let languages = OMP_BeginAssumes.languages;
}
def OMP_BeginDeclareTarget : Directive<"begin declare target"> {
let allowedClauses = [
Expand All @@ -647,10 +650,22 @@ def OMP_BeginDeclareTarget : Directive<"begin declare target"> {
];
let association = AS_Delimited;
let category = CA_Declarative;
let languages = [L_C];
}
def OMP_EndDeclareTarget : Directive<"end declare target"> {
let association = AS_Delimited;
let category = OMP_BeginDeclareTarget.category;
let languages = OMP_BeginDeclareTarget.languages;
}
def OMP_BeginDeclareVariant : Directive<"begin declare variant"> {
let association = AS_Delimited;
let category = CA_Declarative;
let languages = [L_C];
}
def OMP_EndDeclareVariant : Directive<"end declare variant"> {
let association = AS_Delimited;
let category = OMP_BeginDeclareVariant.category;
let languages = OMP_BeginDeclareVariant.languages;
}
def OMP_Cancel : Directive<"cancel"> {
let allowedOnceClauses = [
Expand Down Expand Up @@ -717,10 +732,6 @@ def OMP_DeclareTarget : Directive<"declare target"> {
let association = AS_None;
let category = CA_Declarative;
}
def OMP_EndDeclareTarget : Directive<"end declare target"> {
let association = AS_Delimited;
let category = OMP_DeclareTarget.category;
}
def OMP_DeclareVariant : Directive<"declare variant"> {
let allowedClauses = [
VersionedClause<OMPC_AdjustArgs, 51>,
Expand All @@ -731,10 +742,7 @@ def OMP_DeclareVariant : Directive<"declare variant"> {
];
let association = AS_Declaration;
let category = CA_Declarative;
}
def OMP_EndDeclareVariant : Directive<"end declare variant"> {
let association = AS_Delimited;
let category = OMP_DeclareVariant.category;
let languages = [L_C];
}
def OMP_Depobj : Directive<"depobj"> {
let allowedClauses = [
Expand Down Expand Up @@ -793,15 +801,16 @@ def OMP_Do : Directive<"do"> {
];
let association = AS_Loop;
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_EndDo : Directive<"end do"> {
let allowedOnceClauses = [
VersionedClause<OMPC_NoWait>,
];
// Needed for association computation, since OMP_Do has it "from leafConstructs".
let leafConstructs = OMP_Do.leafConstructs;
let association = OMP_Do.association;
let category = OMP_Do.category;
let languages = OMP_Do.languages;
}
def OMP_Error : Directive<"error"> {
let allowedClauses = [
Expand Down Expand Up @@ -841,6 +850,7 @@ def OMP_For : Directive<"for"> {
];
let association = AS_Loop;
let category = CA_Executable;
let languages = [L_C];
}
def OMP_Interchange : Directive<"interchange"> {
let allowedOnceClauses = [
Expand Down Expand Up @@ -984,6 +994,7 @@ def OMP_EndScope : Directive<"end scope"> {
let leafConstructs = OMP_Scope.leafConstructs;
let association = OMP_Scope.association;
let category = OMP_Scope.category;
let languages = [L_Fortran];
}
def OMP_Section : Directive<"section"> {
let association = AS_Separating;
Expand All @@ -1008,6 +1019,7 @@ def OMP_EndSections : Directive<"end sections"> {
let leafConstructs = OMP_Sections.leafConstructs;
let association = OMP_Sections.association;
let category = OMP_Sections.category;
let languages = [L_Fortran];
}
def OMP_Simd : Directive<"simd"> {
let allowedClauses = [
Expand Down Expand Up @@ -1052,6 +1064,7 @@ def OMP_EndSingle : Directive<"end single"> {
let leafConstructs = OMP_Single.leafConstructs;
let association = OMP_Single.association;
let category = OMP_Single.category;
let languages = [L_Fortran];
}
def OMP_Target : Directive<"target"> {
let allowedClauses = [
Expand Down Expand Up @@ -1259,6 +1272,7 @@ def OMP_Workshare : Directive<"workshare"> {
];
let association = AS_Block;
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_EndWorkshare : Directive<"end workshare"> {
let allowedOnceClauses = [
Expand All @@ -1267,6 +1281,7 @@ def OMP_EndWorkshare : Directive<"end workshare"> {
let leafConstructs = OMP_Workshare.leafConstructs;
let association = OMP_Workshare.association;
let category = OMP_Workshare.category;
let languages = [L_Fortran];
}

//===----------------------------------------------------------------------===//
Expand Down Expand Up @@ -1298,6 +1313,7 @@ def OMP_DistributeParallelDo : Directive<"distribute parallel do"> {
];
let leafConstructs = [OMP_Distribute, OMP_Parallel, OMP_Do];
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_DistributeParallelDoSimd : Directive<"distribute parallel do simd"> {
let allowedClauses = [
Expand All @@ -1324,6 +1340,7 @@ def OMP_DistributeParallelDoSimd : Directive<"distribute parallel do simd"> {
];
let leafConstructs = [OMP_Distribute, OMP_Parallel, OMP_Do, OMP_Simd];
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_DistributeParallelFor : Directive<"distribute parallel for"> {
let allowedClauses = [
Expand All @@ -1346,6 +1363,7 @@ def OMP_DistributeParallelFor : Directive<"distribute parallel for"> {
];
let leafConstructs = [OMP_Distribute, OMP_Parallel, OMP_For];
let category = CA_Executable;
let languages = [L_C];
}
def OMP_DistributeParallelForSimd : Directive<"distribute parallel for simd"> {
let allowedClauses = [
Expand Down Expand Up @@ -1373,6 +1391,7 @@ def OMP_DistributeParallelForSimd : Directive<"distribute parallel for simd"> {
];
let leafConstructs = [OMP_Distribute, OMP_Parallel, OMP_For, OMP_Simd];
let category = CA_Executable;
let languages = [L_C];
}
def OMP_DistributeSimd : Directive<"distribute simd"> {
let allowedClauses = [
Expand Down Expand Up @@ -1422,6 +1441,7 @@ def OMP_DoSimd : Directive<"do simd"> {
];
let leafConstructs = [OMP_Do, OMP_Simd];
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_EndDoSimd : Directive<"end do simd"> {
let allowedOnceClauses = [
Expand All @@ -1430,6 +1450,7 @@ def OMP_EndDoSimd : Directive<"end do simd"> {
let leafConstructs = OMP_DoSimd.leafConstructs;
let association = OMP_DoSimd.association;
let category = OMP_DoSimd.category;
let languages = [L_Fortran];
}
def OMP_ForSimd : Directive<"for simd"> {
let allowedClauses = [
Expand Down Expand Up @@ -1611,6 +1632,7 @@ def OMP_ParallelDo : Directive<"parallel do"> {
];
let leafConstructs = [OMP_Parallel, OMP_Do];
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_ParallelDoSimd : Directive<"parallel do simd"> {
let allowedClauses = [
Expand Down Expand Up @@ -1639,6 +1661,7 @@ def OMP_ParallelDoSimd : Directive<"parallel do simd"> {
];
let leafConstructs = [OMP_Parallel, OMP_Do, OMP_Simd];
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_ParallelFor : Directive<"parallel for"> {
let allowedClauses = [
Expand All @@ -1662,6 +1685,7 @@ def OMP_ParallelFor : Directive<"parallel for"> {
];
let leafConstructs = [OMP_Parallel, OMP_For];
let category = CA_Executable;
let languages = [L_C];
}
def OMP_ParallelForSimd : Directive<"parallel for simd"> {
let allowedClauses = [
Expand Down Expand Up @@ -1689,6 +1713,7 @@ def OMP_ParallelForSimd : Directive<"parallel for simd"> {
];
let leafConstructs = [OMP_Parallel, OMP_For, OMP_Simd];
let category = CA_Executable;
let languages = [L_C];
}
def OMP_parallel_loop : Directive<"parallel loop"> {
let allowedClauses = [
Expand Down Expand Up @@ -1907,6 +1932,7 @@ def OMP_ParallelWorkshare : Directive<"parallel workshare"> {
];
let leafConstructs = [OMP_Parallel, OMP_Workshare];
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_TargetParallel : Directive<"target parallel"> {
let allowedClauses = [
Expand Down Expand Up @@ -1966,6 +1992,7 @@ def OMP_TargetParallelDo : Directive<"target parallel do"> {
];
let leafConstructs = [OMP_Target, OMP_Parallel, OMP_Do];
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_TargetParallelDoSimd : Directive<"target parallel do simd"> {
let allowedClauses = [
Expand Down Expand Up @@ -1999,6 +2026,7 @@ def OMP_TargetParallelDoSimd : Directive<"target parallel do simd"> {
];
let leafConstructs = [OMP_Target, OMP_Parallel, OMP_Do, OMP_Simd];
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_TargetParallelFor : Directive<"target parallel for"> {
let allowedClauses = [
Expand Down Expand Up @@ -2033,6 +2061,7 @@ def OMP_TargetParallelFor : Directive<"target parallel for"> {
];
let leafConstructs = [OMP_Target, OMP_Parallel, OMP_For];
let category = CA_Executable;
let languages = [L_C];
}
def OMP_TargetParallelForSimd : Directive<"target parallel for simd"> {
let allowedClauses = [
Expand Down Expand Up @@ -2071,6 +2100,7 @@ def OMP_TargetParallelForSimd : Directive<"target parallel for simd"> {
];
let leafConstructs = [OMP_Target, OMP_Parallel, OMP_For, OMP_Simd];
let category = CA_Executable;
let languages = [L_C];
}
def OMP_target_parallel_loop : Directive<"target parallel loop"> {
let allowedClauses = [
Expand Down Expand Up @@ -2230,8 +2260,10 @@ def OMP_TargetTeamsDistributeParallelDo :
VersionedClause<OMPC_Schedule>,
VersionedClause<OMPC_ThreadLimit>,
];
let leafConstructs = [OMP_Target, OMP_Teams, OMP_Distribute, OMP_Parallel, OMP_Do];
let leafConstructs =
[OMP_Target, OMP_Teams, OMP_Distribute, OMP_Parallel, OMP_Do];
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_TargetTeamsDistributeParallelDoSimd :
Directive<"target teams distribute parallel do simd"> {
Expand Down Expand Up @@ -2268,8 +2300,10 @@ def OMP_TargetTeamsDistributeParallelDoSimd :
VersionedClause<OMPC_SimdLen>,
VersionedClause<OMPC_ThreadLimit>,
];
let leafConstructs = [OMP_Target, OMP_Teams, OMP_Distribute, OMP_Parallel, OMP_Do, OMP_Simd];
let leafConstructs =
[OMP_Target, OMP_Teams, OMP_Distribute, OMP_Parallel, OMP_Do, OMP_Simd];
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_TargetTeamsDistributeParallelFor :
Directive<"target teams distribute parallel for"> {
Expand Down Expand Up @@ -2303,8 +2337,10 @@ def OMP_TargetTeamsDistributeParallelFor :
let allowedOnceClauses = [
VersionedClause<OMPC_OMPX_DynCGroupMem>,
];
let leafConstructs = [OMP_Target, OMP_Teams, OMP_Distribute, OMP_Parallel, OMP_For];
let leafConstructs =
[OMP_Target, OMP_Teams, OMP_Distribute, OMP_Parallel, OMP_For];
let category = CA_Executable;
let languages = [L_C];
}
def OMP_TargetTeamsDistributeParallelForSimd :
Directive<"target teams distribute parallel for simd"> {
Expand Down Expand Up @@ -2343,8 +2379,10 @@ def OMP_TargetTeamsDistributeParallelForSimd :
let allowedOnceClauses = [
VersionedClause<OMPC_OMPX_DynCGroupMem>,
];
let leafConstructs = [OMP_Target, OMP_Teams, OMP_Distribute, OMP_Parallel, OMP_For, OMP_Simd];
let leafConstructs =
[OMP_Target, OMP_Teams, OMP_Distribute, OMP_Parallel, OMP_For, OMP_Simd];
let category = CA_Executable;
let languages = [L_C];
}
def OMP_TargetTeamsDistributeSimd :
Directive<"target teams distribute simd"> {
Expand Down Expand Up @@ -2494,6 +2532,7 @@ def OMP_TeamsDistributeParallelDo :
];
let leafConstructs = [OMP_Teams, OMP_Distribute, OMP_Parallel, OMP_Do];
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_TeamsDistributeParallelDoSimd :
Directive<"teams distribute parallel do simd"> {
Expand Down Expand Up @@ -2522,8 +2561,10 @@ def OMP_TeamsDistributeParallelDoSimd :
VersionedClause<OMPC_SimdLen>,
VersionedClause<OMPC_ThreadLimit>,
];
let leafConstructs = [OMP_Teams, OMP_Distribute, OMP_Parallel, OMP_Do, OMP_Simd];
let leafConstructs =
[OMP_Teams, OMP_Distribute, OMP_Parallel, OMP_Do, OMP_Simd];
let category = CA_Executable;
let languages = [L_Fortran];
}
def OMP_TeamsDistributeParallelFor :
Directive<"teams distribute parallel for"> {
Expand All @@ -2549,6 +2590,7 @@ def OMP_TeamsDistributeParallelFor :
];
let leafConstructs = [OMP_Teams, OMP_Distribute, OMP_Parallel, OMP_For];
let category = CA_Executable;
let languages = [L_C];
}
def OMP_TeamsDistributeParallelForSimd :
Directive<"teams distribute parallel for simd"> {
Expand Down Expand Up @@ -2576,8 +2618,10 @@ def OMP_TeamsDistributeParallelForSimd :
VersionedClause<OMPC_SimdLen>,
VersionedClause<OMPC_ThreadLimit>,
];
let leafConstructs = [OMP_Teams, OMP_Distribute, OMP_Parallel, OMP_For, OMP_Simd];
let leafConstructs =
[OMP_Teams, OMP_Distribute, OMP_Parallel, OMP_For, OMP_Simd];
let category = CA_Executable;
let languages = [L_C];
}
def OMP_TeamsDistributeSimd : Directive<"teams distribute simd"> {
let allowedClauses = [
Expand Down
Loading