head 1.1; branch 1.1.1; access; symbols netbsd-11-0-RC4:1.1.1.11 netbsd-11-0-RC3:1.1.1.11 netbsd-11-0-RC2:1.1.1.11 netbsd-11-0-RC1:1.1.1.11 perseant-exfatfs-base-20250801:1.1.1.11 netbsd-11:1.1.1.11.0.10 netbsd-11-base:1.1.1.11 netbsd-10-1-RELEASE:1.1.1.11 perseant-exfatfs-base-20240630:1.1.1.11 perseant-exfatfs:1.1.1.11.0.8 perseant-exfatfs-base:1.1.1.11 netbsd-8-3-RELEASE:1.1.1.8 netbsd-9-4-RELEASE:1.1.1.10 netbsd-10-0-RELEASE:1.1.1.11 netbsd-10-0-RC6:1.1.1.11 netbsd-10-0-RC5:1.1.1.11 netbsd-10-0-RC4:1.1.1.11 netbsd-10-0-RC3:1.1.1.11 netbsd-10-0-RC2:1.1.1.11 netbsd-10-0-RC1:1.1.1.11 netbsd-10:1.1.1.11.0.6 netbsd-10-base:1.1.1.11 netbsd-9-3-RELEASE:1.1.1.10 cjep_sun2x:1.1.1.11.0.4 cjep_sun2x-base:1.1.1.11 cjep_staticlib_x-base1:1.1.1.11 netbsd-9-2-RELEASE:1.1.1.10 cjep_staticlib_x:1.1.1.11.0.2 cjep_staticlib_x-base:1.1.1.11 netbsd-9-1-RELEASE:1.1.1.10 phil-wifi-20200421:1.1.1.11 phil-wifi-20200411:1.1.1.11 phil-wifi-20200406:1.1.1.11 netbsd-8-2-RELEASE:1.1.1.8 netbsd-9-0-RELEASE:1.1.1.10 netbsd-9-0-RC2:1.1.1.10 netbsd-9-0-RC1:1.1.1.10 netbsd-9:1.1.1.10.0.2 netbsd-9-base:1.1.1.10 phil-wifi-20190609:1.1.1.10 netbsd-8-1-RELEASE:1.1.1.8 netbsd-8-1-RC1:1.1.1.8 pgoyette-compat-merge-20190127:1.1.1.9.2.1 pgoyette-compat-20190127:1.1.1.10 pgoyette-compat-20190118:1.1.1.10 pgoyette-compat-1226:1.1.1.10 pgoyette-compat-1126:1.1.1.10 pgoyette-compat-1020:1.1.1.10 pgoyette-compat-0930:1.1.1.10 pgoyette-compat-0906:1.1.1.10 netbsd-7-2-RELEASE:1.1.1.4.2.1 pgoyette-compat-0728:1.1.1.10 clang-337282:1.1.1.10 netbsd-8-0-RELEASE:1.1.1.8 phil-wifi:1.1.1.9.0.4 phil-wifi-base:1.1.1.9 pgoyette-compat-0625:1.1.1.9 netbsd-8-0-RC2:1.1.1.8 pgoyette-compat-0521:1.1.1.9 pgoyette-compat-0502:1.1.1.9 pgoyette-compat-0422:1.1.1.9 netbsd-8-0-RC1:1.1.1.8 pgoyette-compat-0415:1.1.1.9 pgoyette-compat-0407:1.1.1.9 pgoyette-compat-0330:1.1.1.9 pgoyette-compat-0322:1.1.1.9 pgoyette-compat-0315:1.1.1.9 netbsd-7-1-2-RELEASE:1.1.1.4.2.1 pgoyette-compat:1.1.1.9.0.2 pgoyette-compat-base:1.1.1.9 netbsd-7-1-1-RELEASE:1.1.1.4.2.1 clang-319952:1.1.1.9 matt-nb8-mediatek:1.1.1.8.0.8 matt-nb8-mediatek-base:1.1.1.8 clang-309604:1.1.1.9 perseant-stdc-iso10646:1.1.1.8.0.6 perseant-stdc-iso10646-base:1.1.1.8 netbsd-8:1.1.1.8.0.4 netbsd-8-base:1.1.1.8 prg-localcount2-base3:1.1.1.8 prg-localcount2-base2:1.1.1.8 prg-localcount2-base1:1.1.1.8 prg-localcount2:1.1.1.8.0.2 prg-localcount2-base:1.1.1.8 pgoyette-localcount-20170426:1.1.1.8 bouyer-socketcan-base1:1.1.1.8 pgoyette-localcount-20170320:1.1.1.8 netbsd-7-1:1.1.1.4.2.1.0.6 netbsd-7-1-RELEASE:1.1.1.4.2.1 netbsd-7-1-RC2:1.1.1.4.2.1 clang-294123:1.1.1.8 netbsd-7-nhusb-base-20170116:1.1.1.4.2.1 bouyer-socketcan:1.1.1.7.0.2 bouyer-socketcan-base:1.1.1.7 clang-291444:1.1.1.7 pgoyette-localcount-20170107:1.1.1.6 netbsd-7-1-RC1:1.1.1.4.2.1 pgoyette-localcount-20161104:1.1.1.6 netbsd-7-0-2-RELEASE:1.1.1.4.2.1 localcount-20160914:1.1.1.6 netbsd-7-nhusb:1.1.1.4.2.1.0.4 netbsd-7-nhusb-base:1.1.1.4.2.1 clang-280599:1.1.1.6 pgoyette-localcount-20160806:1.1.1.6 pgoyette-localcount-20160726:1.1.1.6 pgoyette-localcount:1.1.1.6.0.2 pgoyette-localcount-base:1.1.1.6 netbsd-7-0-1-RELEASE:1.1.1.4.2.1 clang-261930:1.1.1.6 netbsd-7-0:1.1.1.4.2.1.0.2 netbsd-7-0-RELEASE:1.1.1.4.2.1 netbsd-7-0-RC3:1.1.1.4.2.1 netbsd-7-0-RC2:1.1.1.4.2.1 netbsd-7-0-RC1:1.1.1.4.2.1 clang-237755:1.1.1.5 clang-232565:1.1.1.5 clang-227398:1.1.1.5 tls-maxphys-base:1.1.1.4 tls-maxphys:1.1.1.4.0.4 netbsd-7:1.1.1.4.0.2 netbsd-7-base:1.1.1.4 clang-215315:1.1.1.4 clang-209886:1.1.1.3 yamt-pagecache:1.1.1.2.0.4 yamt-pagecache-base9:1.1.1.2 tls-earlyentropy:1.1.1.2.0.2 tls-earlyentropy-base:1.1.1.3 riastradh-xf86-video-intel-2-7-1-pre-2-21-15:1.1.1.2 riastradh-drm2-base3:1.1.1.2 clang-202566:1.1.1.2 clang-201163:1.1.1.1 clang-199312:1.1.1.1 clang-198450:1.1.1.1 clang-196603:1.1.1.1 clang-195771:1.1.1.1 LLVM:1.1.1; locks; strict; comment @// @; 1.1 date 2013.11.28.14.14.49; author joerg; state Exp; branches 1.1.1.1; next ; commitid ow8OybrawrB1f3fx; 1.1.1.1 date 2013.11.28.14.14.49; author joerg; state Exp; branches; next 1.1.1.2; commitid ow8OybrawrB1f3fx; 1.1.1.2 date 2014.03.04.19.54.02; author joerg; state Exp; branches 1.1.1.2.2.1 1.1.1.2.4.1; next 1.1.1.3; commitid 29z1hJonZISIXprx; 1.1.1.3 date 2014.05.30.18.14.40; author joerg; state Exp; branches; next 1.1.1.4; commitid 8q0kdlBlCn09GACx; 1.1.1.4 date 2014.08.10.17.08.27; author joerg; state Exp; branches 1.1.1.4.2.1 1.1.1.4.4.1; next 1.1.1.5; commitid N85tXAN6Ex9VZPLx; 1.1.1.5 date 2015.01.29.19.57.32; author joerg; state Exp; branches; next 1.1.1.6; commitid mlISSizlPKvepX7y; 1.1.1.6 date 2016.02.27.22.11.54; author joerg; state Exp; branches 1.1.1.6.2.1; next 1.1.1.7; commitid tIimz3oDlh1NpBWy; 1.1.1.7 date 2017.01.11.10.34.54; author joerg; state Exp; branches 1.1.1.7.2.1; next 1.1.1.8; commitid CNnUNfII1jgNmxBz; 1.1.1.8 date 2017.02.09.17.38.18; author joerg; state Exp; branches; next 1.1.1.9; commitid UxB8JMFWM7xyMiFz; 1.1.1.9 date 2017.08.01.19.34.55; author joerg; state Exp; branches 1.1.1.9.2.1 1.1.1.9.4.1; next 1.1.1.10; commitid pMuDy65V0VicSx1A; 1.1.1.10 date 2018.07.17.18.31.25; author joerg; state Exp; branches; next 1.1.1.11; commitid wDzL46ALjrCZgwKA; 1.1.1.11 date 2019.11.13.22.19.20; author joerg; state dead; branches; next ; commitid QD8YATxuNG34YJKB; 1.1.1.2.2.1 date 2014.08.10.07.08.07; author tls; state Exp; branches; next ; commitid t01A1TLTYxkpGMLx; 1.1.1.2.4.1 date 2014.03.04.19.54.02; author yamt; state dead; branches; next 1.1.1.2.4.2; commitid WSrDtL5nYAUyiyBx; 1.1.1.2.4.2 date 2014.05.22.16.18.26; author yamt; state Exp; branches; next ; commitid WSrDtL5nYAUyiyBx; 1.1.1.4.2.1 date 2015.06.04.20.04.27; author snj; state Exp; branches; next ; commitid yRnjq9fueSo6n9oy; 1.1.1.4.4.1 date 2014.08.10.17.08.27; author tls; state dead; branches; next 1.1.1.4.4.2; commitid jTnpym9Qu0o4R1Nx; 1.1.1.4.4.2 date 2014.08.19.23.47.26; author tls; state Exp; branches; next ; commitid jTnpym9Qu0o4R1Nx; 1.1.1.6.2.1 date 2017.03.20.06.52.36; author pgoyette; state Exp; branches; next ; commitid jjw7cAwgyKq7RfKz; 1.1.1.7.2.1 date 2017.04.21.16.51.37; author bouyer; state Exp; branches; next ; commitid dUG7nkTKALCadqOz; 1.1.1.9.2.1 date 2018.07.28.04.33.16; author pgoyette; state Exp; branches; next ; commitid 1UP1xAIUxv1ZgRLA; 1.1.1.9.4.1 date 2019.06.10.21.45.20; author christos; state Exp; branches; next 1.1.1.9.4.2; commitid jtc8rnCzWiEEHGqB; 1.1.1.9.4.2 date 2020.04.13.07.46.31; author martin; state dead; branches; next ; commitid X01YhRUPVUDaec4C; desc @@ 1.1 log @Initial revision @ text @//===--- OpenMPKinds.cpp - Token Kinds Support ----------------------------===// // // The LLVM Compiler Infrastructure // // This file is distributed under the University of Illinois Open Source // License. See LICENSE.TXT for details. // //===----------------------------------------------------------------------===// /// \file /// \brief This file implements the OpenMP enum and support functions. /// //===----------------------------------------------------------------------===// #include "clang/Basic/OpenMPKinds.h" #include "clang/Basic/IdentifierTable.h" #include "llvm/ADT/StringRef.h" #include "llvm/ADT/StringSwitch.h" #include "llvm/Support/ErrorHandling.h" #include using namespace clang; OpenMPDirectiveKind clang::getOpenMPDirectiveKind(StringRef Str) { return llvm::StringSwitch(Str) #define OPENMP_DIRECTIVE(Name) \ .Case(#Name, OMPD_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPD_unknown); } const char *clang::getOpenMPDirectiveName(OpenMPDirectiveKind Kind) { assert(Kind < NUM_OPENMP_DIRECTIVES); switch (Kind) { case OMPD_unknown: return "unknown"; #define OPENMP_DIRECTIVE(Name) \ case OMPD_##Name : return #Name; #include "clang/Basic/OpenMPKinds.def" case NUM_OPENMP_DIRECTIVES: break; } llvm_unreachable("Invalid OpenMP directive kind"); } OpenMPClauseKind clang::getOpenMPClauseKind(StringRef Str) { return llvm::StringSwitch(Str) #define OPENMP_CLAUSE(Name, Class) \ .Case(#Name, OMPC_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_unknown); } const char *clang::getOpenMPClauseName(OpenMPClauseKind Kind) { assert(Kind < NUM_OPENMP_CLAUSES); switch (Kind) { case OMPC_unknown: return "unknown"; #define OPENMP_CLAUSE(Name, Class) \ case OMPC_##Name : return #Name; #include "clang/Basic/OpenMPKinds.def" case OMPC_threadprivate: return "threadprivate or thread local"; case NUM_OPENMP_CLAUSES: break; } llvm_unreachable("Invalid OpenMP clause kind"); } unsigned clang::getOpenMPSimpleClauseType(OpenMPClauseKind Kind, StringRef Str) { switch (Kind) { case OMPC_default: return llvm::StringSwitch(Str) #define OPENMP_DEFAULT_KIND(Name) \ .Case(#Name, OMPC_DEFAULT_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_DEFAULT_unknown); case OMPC_unknown: case OMPC_threadprivate: case OMPC_private: case OMPC_firstprivate: case OMPC_shared: case NUM_OPENMP_CLAUSES: break; } llvm_unreachable("Invalid OpenMP simple clause kind"); } const char *clang::getOpenMPSimpleClauseTypeName(OpenMPClauseKind Kind, unsigned Type) { switch (Kind) { case OMPC_default: switch (Type) { case OMPC_DEFAULT_unknown: return "unknown"; #define OPENMP_DEFAULT_KIND(Name) \ case OMPC_DEFAULT_##Name : return #Name; #include "clang/Basic/OpenMPKinds.def" } llvm_unreachable("Invalid OpenMP 'default' clause type"); case OMPC_unknown: case OMPC_threadprivate: case OMPC_private: case OMPC_firstprivate: case OMPC_shared: case NUM_OPENMP_CLAUSES: break; } llvm_unreachable("Invalid OpenMP simple clause kind"); } bool clang::isAllowedClauseForDirective(OpenMPDirectiveKind DKind, OpenMPClauseKind CKind) { assert(DKind < NUM_OPENMP_DIRECTIVES); assert(CKind < NUM_OPENMP_CLAUSES); switch (DKind) { case OMPD_parallel: switch (CKind) { #define OPENMP_PARALLEL_CLAUSE(Name) \ case OMPC_##Name: return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_unknown: case OMPD_threadprivate: case OMPD_task: case NUM_OPENMP_DIRECTIVES: break; } return false; } @ 1.1.1.1 log @Import Clang 3.4rc1 r195771. @ text @@ 1.1.1.2 log @Import Clang 3.5svn r202566. @ text @a79 1 case OMPC_if: a102 1 case OMPC_if: a125 9 case OMPD_simd: switch (CKind) { #define OPENMP_SIMD_CLAUSE(Name) \ case OMPC_##Name: return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; @ 1.1.1.2.2.1 log @Rebase. @ text @d32 1 a32 1 assert(Kind <= OMPD_unknown); d39 1 d54 1 a54 1 assert(Kind <= OMPC_unknown); d63 2 a77 6 case OMPC_proc_bind: return llvm::StringSwitch(Str) #define OPENMP_PROC_BIND_KIND(Name) \ .Case(#Name, OMPC_PROC_BIND_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_PROC_BIND_unknown); a80 3 case OMPC_num_threads: case OMPC_safelen: case OMPC_collapse: d84 1 a84 3 case OMPC_linear: case OMPC_aligned: case OMPC_copyin: a101 9 case OMPC_proc_bind: switch (Type) { case OMPC_PROC_BIND_unknown: return "unknown"; #define OPENMP_PROC_BIND_KIND(Name) \ case OMPC_PROC_BIND_##Name : return #Name; #include "clang/Basic/OpenMPKinds.def" } llvm_unreachable("Invalid OpenMP 'proc_bind' clause type"); a104 3 case OMPC_num_threads: case OMPC_safelen: case OMPC_collapse: d108 1 a108 3 case OMPC_linear: case OMPC_aligned: case OMPC_copyin: d116 2 a117 2 assert(DKind <= OMPD_unknown); assert(CKind <= OMPC_unknown); d140 1 @ 1.1.1.3 log @Import Clang 3.5svn r209886. @ text @d32 1 a32 1 assert(Kind <= OMPD_unknown); d39 1 d54 1 a54 1 assert(Kind <= OMPC_unknown); d63 2 a77 6 case OMPC_proc_bind: return llvm::StringSwitch(Str) #define OPENMP_PROC_BIND_KIND(Name) \ .Case(#Name, OMPC_PROC_BIND_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_PROC_BIND_unknown); a80 3 case OMPC_num_threads: case OMPC_safelen: case OMPC_collapse: d84 1 a84 3 case OMPC_linear: case OMPC_aligned: case OMPC_copyin: a101 9 case OMPC_proc_bind: switch (Type) { case OMPC_PROC_BIND_unknown: return "unknown"; #define OPENMP_PROC_BIND_KIND(Name) \ case OMPC_PROC_BIND_##Name : return #Name; #include "clang/Basic/OpenMPKinds.def" } llvm_unreachable("Invalid OpenMP 'proc_bind' clause type"); a104 3 case OMPC_num_threads: case OMPC_safelen: case OMPC_collapse: d108 1 a108 3 case OMPC_linear: case OMPC_aligned: case OMPC_copyin: d116 2 a117 2 assert(DKind <= OMPD_unknown); assert(CKind <= OMPC_unknown); d140 1 @ 1.1.1.4 log @Import clang 3.6svn r215315. @ text @d25 2 a26 2 #define OPENMP_DIRECTIVE(Name) .Case(#Name, OMPD_##Name) #define OPENMP_DIRECTIVE_EXT(Name, Str) .Case(Str, OMPD_##Name) d28 1 a28 1 .Default(OMPD_unknown); d36 2 a37 6 #define OPENMP_DIRECTIVE(Name) \ case OMPD_##Name: \ return #Name; #define OPENMP_DIRECTIVE_EXT(Name, Str) \ case OMPD_##Name: \ return Str; a44 6 // 'flush' clause cannot be specified explicitly, because this is an implicit // clause for 'flush' directive. If the 'flush' clause is explicitly specified // the Parser should generate a warning about extra tokens at the end of the // directive. if (Str == "flush") return OMPC_unknown; d46 2 a47 1 #define OPENMP_CLAUSE(Name, Class) .Case(#Name, OMPC_##Name) d49 1 a49 1 .Default(OMPC_unknown); d57 2 a58 3 #define OPENMP_CLAUSE(Name, Class) \ case OMPC_##Name: \ return #Name; d71 2 a72 1 #define OPENMP_DEFAULT_KIND(Name) .Case(#Name, OMPC_DEFAULT_##Name) d74 1 a74 1 .Default(OMPC_DEFAULT_unknown); d77 2 a78 1 #define OPENMP_PROC_BIND_KIND(Name) .Case(#Name, OMPC_PROC_BIND_##Name) d80 1 a80 6 .Default(OMPC_PROC_BIND_unknown); case OMPC_schedule: return llvm::StringSwitch(Str) #define OPENMP_SCHEDULE_KIND(Name) .Case(#Name, OMPC_SCHEDULE_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_SCHEDULE_unknown); a83 1 case OMPC_final: a88 1 case OMPC_lastprivate: a89 1 case OMPC_reduction: a92 11 case OMPC_copyprivate: case OMPC_ordered: case OMPC_nowait: case OMPC_untied: case OMPC_mergeable: case OMPC_flush: case OMPC_read: case OMPC_write: case OMPC_update: case OMPC_capture: case OMPC_seq_cst: d105 2 a106 3 #define OPENMP_DEFAULT_KIND(Name) \ case OMPC_DEFAULT_##Name: \ return #Name; d114 2 a115 3 #define OPENMP_PROC_BIND_KIND(Name) \ case OMPC_PROC_BIND_##Name: \ return #Name; a118 10 case OMPC_schedule: switch (Type) { case OMPC_SCHEDULE_unknown: return "unknown"; #define OPENMP_SCHEDULE_KIND(Name) \ case OMPC_SCHEDULE_##Name: \ return #Name; #include "clang/Basic/OpenMPKinds.def" } llvm_unreachable("Invalid OpenMP 'schedule' clause type"); a121 1 case OMPC_final: a126 1 case OMPC_lastprivate: a127 1 case OMPC_reduction: a130 11 case OMPC_copyprivate: case OMPC_ordered: case OMPC_nowait: case OMPC_untied: case OMPC_mergeable: case OMPC_flush: case OMPC_read: case OMPC_write: case OMPC_update: case OMPC_capture: case OMPC_seq_cst: d143 2 a144 3 #define OPENMP_PARALLEL_CLAUSE(Name) \ case OMPC_##Name: \ return true; d152 2 a153 76 #define OPENMP_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_for: switch (CKind) { #define OPENMP_FOR_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_sections: switch (CKind) { #define OPENMP_SECTIONS_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_single: switch (CKind) { #define OPENMP_SINGLE_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_parallel_for: switch (CKind) { #define OPENMP_PARALLEL_FOR_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_parallel_sections: switch (CKind) { #define OPENMP_PARALLEL_SECTIONS_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_task: switch (CKind) { #define OPENMP_TASK_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_flush: return CKind == OMPC_flush; break; case OMPD_atomic: switch (CKind) { #define OPENMP_ATOMIC_CLAUSE(Name) \ case OMPC_##Name: \ return true; d161 1 a161 7 case OMPD_section: case OMPD_master: case OMPD_critical: case OMPD_taskyield: case OMPD_barrier: case OMPD_taskwait: case OMPD_ordered: a165 32 bool clang::isOpenMPLoopDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_simd || DKind == OMPD_for || DKind == OMPD_parallel_for; // TODO add next directives. } bool clang::isOpenMPWorksharingDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_for || DKind == OMPD_sections || DKind == OMPD_section || DKind == OMPD_single || DKind == OMPD_parallel_for || DKind == OMPD_parallel_sections; // TODO add next directives. } bool clang::isOpenMPParallelDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_parallel || DKind == OMPD_parallel_for || DKind == OMPD_parallel_sections; // TODO add next directives. } bool clang::isOpenMPSimdDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_simd; // TODO || DKind == OMPD_for_simd || ... } bool clang::isOpenMPPrivate(OpenMPClauseKind Kind) { return Kind == OMPC_private || Kind == OMPC_firstprivate || Kind == OMPC_lastprivate || Kind == OMPC_linear || Kind == OMPC_reduction; // TODO add next clauses like 'reduction'. } bool clang::isOpenMPThreadPrivate(OpenMPClauseKind Kind) { return Kind == OMPC_threadprivate || Kind == OMPC_copyin; // TODO add next clauses like 'copyprivate'. } @ 1.1.1.4.2.1 log @Update LLVM to 3.6.1, requested by joerg in ticket 824. @ text @a223 10 case OMPD_for_simd: switch (CKind) { #define OPENMP_FOR_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; a253 10 case OMPD_parallel_for_simd: switch (CKind) { #define OPENMP_PARALLEL_FOR_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; a286 20 case OMPD_target: switch (CKind) { #define OPENMP_TARGET_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_teams: switch (CKind) { #define OPENMP_TEAMS_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; d302 2 a303 3 return DKind == OMPD_simd || DKind == OMPD_for || DKind == OMPD_for_simd || DKind == OMPD_parallel_for || DKind == OMPD_parallel_for_simd; // TODO add next directives. d307 1 a307 2 return DKind == OMPD_for || DKind == OMPD_for_simd || DKind == OMPD_sections || DKind == OMPD_section || a308 1 DKind == OMPD_parallel_for_simd || a313 1 DKind == OMPD_parallel_for_simd || a316 4 bool clang::isOpenMPTeamsDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_teams; // TODO add next directives. } d318 1 a318 2 return DKind == OMPD_simd || DKind == OMPD_for_simd || DKind == OMPD_parallel_for_simd; // TODO add next directives. @ 1.1.1.5 log @Import Clang 3.6RC1 r227398. @ text @a223 10 case OMPD_for_simd: switch (CKind) { #define OPENMP_FOR_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; a253 10 case OMPD_parallel_for_simd: switch (CKind) { #define OPENMP_PARALLEL_FOR_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; a286 20 case OMPD_target: switch (CKind) { #define OPENMP_TARGET_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_teams: switch (CKind) { #define OPENMP_TEAMS_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; d302 2 a303 3 return DKind == OMPD_simd || DKind == OMPD_for || DKind == OMPD_for_simd || DKind == OMPD_parallel_for || DKind == OMPD_parallel_for_simd; // TODO add next directives. d307 1 a307 2 return DKind == OMPD_for || DKind == OMPD_for_simd || DKind == OMPD_sections || DKind == OMPD_section || a308 1 DKind == OMPD_parallel_for_simd || a313 1 DKind == OMPD_parallel_for_simd || a316 4 bool clang::isOpenMPTeamsDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_teams; // TODO add next directives. } d318 1 a318 2 return DKind == OMPD_simd || DKind == OMPD_for_simd || DKind == OMPD_parallel_for_simd; // TODO add next directives. @ 1.1.1.6 log @Import Clang 3.8.0rc3 r261930. @ text @d90 2 a91 5 return llvm::StringSwitch(Str) #define OPENMP_SCHEDULE_KIND(Name) \ .Case(#Name, static_cast(OMPC_SCHEDULE_##Name)) #define OPENMP_SCHEDULE_MODIFIER(Name) \ .Case(#Name, static_cast(OMPC_SCHEDULE_MODIFIER_##Name)) a93 15 case OMPC_depend: return llvm::StringSwitch(Str) #define OPENMP_DEPEND_KIND(Name) .Case(#Name, OMPC_DEPEND_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_DEPEND_unknown); case OMPC_linear: return llvm::StringSwitch(Str) #define OPENMP_LINEAR_KIND(Name) .Case(#Name, OMPC_LINEAR_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_LINEAR_unknown); case OMPC_map: return llvm::StringSwitch(Str) #define OPENMP_MAP_KIND(Name) .Case(#Name, OMPC_MAP_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_MAP_unknown); a99 1 case OMPC_simdlen: d106 1 a119 10 case OMPC_device: case OMPC_threads: case OMPC_simd: case OMPC_num_teams: case OMPC_thread_limit: case OMPC_priority: case OMPC_grainsize: case OMPC_nogroup: case OMPC_num_tasks: case OMPC_hint: a150 1 case OMPC_SCHEDULE_MODIFIER_last: d153 2 a154 5 case OMPC_SCHEDULE_##Name: \ return #Name; #define OPENMP_SCHEDULE_MODIFIER(Name) \ case OMPC_SCHEDULE_MODIFIER_##Name: \ return #Name; a157 32 case OMPC_depend: switch (Type) { case OMPC_DEPEND_unknown: return "unknown"; #define OPENMP_DEPEND_KIND(Name) \ case OMPC_DEPEND_##Name: \ return #Name; #include "clang/Basic/OpenMPKinds.def" } llvm_unreachable("Invalid OpenMP 'depend' clause type"); case OMPC_linear: switch (Type) { case OMPC_LINEAR_unknown: return "unknown"; #define OPENMP_LINEAR_KIND(Name) \ case OMPC_LINEAR_##Name: \ return #Name; #include "clang/Basic/OpenMPKinds.def" } llvm_unreachable("Invalid OpenMP 'linear' clause type"); case OMPC_map: switch (Type) { case OMPC_MAP_unknown: return "unknown"; #define OPENMP_MAP_KIND(Name) \ case OMPC_MAP_##Name: \ return #Name; #include "clang/Basic/OpenMPKinds.def" default: break; } llvm_unreachable("Invalid OpenMP 'map' clause type"); a163 1 case OMPC_simdlen: d170 1 a183 10 case OMPC_device: case OMPC_threads: case OMPC_simd: case OMPC_num_teams: case OMPC_thread_limit: case OMPC_priority: case OMPC_grainsize: case OMPC_nogroup: case OMPC_num_tasks: case OMPC_hint: a316 10 case OMPD_target_data: switch (CKind) { #define OPENMP_TARGET_DATA_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; a326 60 case OMPD_cancel: switch (CKind) { #define OPENMP_CANCEL_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_ordered: switch (CKind) { #define OPENMP_ORDERED_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_taskloop: switch (CKind) { #define OPENMP_TASKLOOP_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_taskloop_simd: switch (CKind) { #define OPENMP_TASKLOOP_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_critical: switch (CKind) { #define OPENMP_CRITICAL_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_distribute: switch (CKind) { #define OPENMP_DISTRIBUTE_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; d331 1 d335 1 a335 2 case OMPD_taskgroup: case OMPD_cancellation_point: d343 2 a344 4 DKind == OMPD_parallel_for || DKind == OMPD_parallel_for_simd || DKind == OMPD_taskloop || DKind == OMPD_taskloop_simd || DKind == OMPD_distribute; // TODO add next directives. a354 4 bool clang::isOpenMPTaskLoopDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_taskloop || DKind == OMPD_taskloop_simd; } a360 4 bool clang::isOpenMPTargetDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_target; // TODO add next directives. } d367 1 a367 6 DKind == OMPD_parallel_for_simd || DKind == OMPD_taskloop_simd; // TODO add next directives. } bool clang::isOpenMPDistributeDirective(OpenMPDirectiveKind Kind) { return Kind == OMPD_distribute; // TODO add next directives. d377 2 a378 1 return Kind == OMPC_threadprivate || Kind == OMPC_copyin; @ 1.1.1.6.2.1 log @Sync with HEAD @ text @a57 1 .Case("uniform", OMPC_uniform) a69 2 case OMPC_uniform: return "uniform"; a111 13 case OMPC_dist_schedule: return llvm::StringSwitch(Str) #define OPENMP_DIST_SCHEDULE_KIND(Name) .Case(#Name, OMPC_DIST_SCHEDULE_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_DIST_SCHEDULE_unknown); case OMPC_defaultmap: return llvm::StringSwitch(Str) #define OPENMP_DEFAULTMAP_KIND(Name) \ .Case(#Name, static_cast(OMPC_DEFAULTMAP_##Name)) #define OPENMP_DEFAULTMAP_MODIFIER(Name) \ .Case(#Name, static_cast(OMPC_DEFAULTMAP_MODIFIER_##Name)) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_DEFAULTMAP_unknown); a147 5 case OMPC_uniform: case OMPC_to: case OMPC_from: case OMPC_use_device_ptr: case OMPC_is_device_ptr: a221 24 case OMPC_dist_schedule: switch (Type) { case OMPC_DIST_SCHEDULE_unknown: return "unknown"; #define OPENMP_DIST_SCHEDULE_KIND(Name) \ case OMPC_DIST_SCHEDULE_##Name: \ return #Name; #include "clang/Basic/OpenMPKinds.def" } llvm_unreachable("Invalid OpenMP 'dist_schedule' clause type"); case OMPC_defaultmap: switch (Type) { case OMPC_DEFAULTMAP_unknown: case OMPC_DEFAULTMAP_MODIFIER_last: return "unknown"; #define OPENMP_DEFAULTMAP_KIND(Name) \ case OMPC_DEFAULTMAP_##Name: \ return #Name; #define OPENMP_DEFAULTMAP_MODIFIER(Name) \ case OMPC_DEFAULTMAP_MODIFIER_##Name: \ return #Name; #include "clang/Basic/OpenMPKinds.def" } llvm_unreachable("Invalid OpenMP 'schedule' clause type"); a257 5 case OMPC_uniform: case OMPC_to: case OMPC_from: case OMPC_use_device_ptr: case OMPC_is_device_ptr: a400 50 case OMPD_target_enter_data: switch (CKind) { #define OPENMP_TARGET_ENTER_DATA_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_exit_data: switch (CKind) { #define OPENMP_TARGET_EXIT_DATA_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_parallel: switch (CKind) { #define OPENMP_TARGET_PARALLEL_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_parallel_for: switch (CKind) { #define OPENMP_TARGET_PARALLEL_FOR_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_update: switch (CKind) { #define OPENMP_TARGET_UPDATE_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; a410 2 case OMPD_declare_simd: break; a470 142 case OMPD_distribute_parallel_for: switch (CKind) { #define OPENMP_DISTRIBUTE_PARALLEL_FOR_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_distribute_parallel_for_simd: switch (CKind) { #define OPENMP_DISTRIBUTE_PARALLEL_FOR_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_distribute_simd: switch (CKind) { #define OPENMP_DISTRIBUTE_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_parallel_for_simd: switch (CKind) { #define OPENMP_TARGET_PARALLEL_FOR_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_simd: switch (CKind) { #define OPENMP_TARGET_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_teams_distribute: switch (CKind) { #define OPENMP_TEAMS_DISTRIBUTE_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_teams_distribute_simd: switch (CKind) { #define OPENMP_TEAMS_DISTRIBUTE_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_teams_distribute_parallel_for_simd: switch (CKind) { #define OPENMP_TEAMS_DISTRIBUTE_PARALLEL_FOR_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_teams_distribute_parallel_for: switch (CKind) { #define OPENMP_TEAMS_DISTRIBUTE_PARALLEL_FOR_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_teams: switch (CKind) { #define OPENMP_TARGET_TEAMS_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_teams_distribute: switch (CKind) { #define OPENMP_TARGET_TEAMS_DISTRIBUTE_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_teams_distribute_parallel_for: switch (CKind) { #define OPENMP_TARGET_TEAMS_DISTRIBUTE_PARALLEL_FOR_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_teams_distribute_parallel_for_simd: switch (CKind) { #define OPENMP_TARGET_TEAMS_DISTRIBUTE_PARALLEL_FOR_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_teams_distribute_simd: switch (CKind) { #define OPENMP_TARGET_TEAMS_DISTRIBUTE_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_declare_target: case OMPD_end_declare_target: a479 1 case OMPD_declare_reduction: d488 3 a490 14 DKind == OMPD_taskloop || DKind == OMPD_taskloop_simd || DKind == OMPD_distribute || DKind == OMPD_target_parallel_for || DKind == OMPD_distribute_parallel_for || DKind == OMPD_distribute_parallel_for_simd || DKind == OMPD_distribute_simd || DKind == OMPD_target_parallel_for_simd || DKind == OMPD_target_simd || DKind == OMPD_teams_distribute || DKind == OMPD_teams_distribute_simd || DKind == OMPD_teams_distribute_parallel_for_simd || DKind == OMPD_teams_distribute_parallel_for || DKind == OMPD_target_teams_distribute || DKind == OMPD_target_teams_distribute_parallel_for || DKind == OMPD_target_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_simd; d497 2 a498 9 DKind == OMPD_parallel_for_simd || DKind == OMPD_parallel_sections || DKind == OMPD_target_parallel_for || DKind == OMPD_distribute_parallel_for || DKind == OMPD_distribute_parallel_for_simd || DKind == OMPD_target_parallel_for_simd || DKind == OMPD_teams_distribute_parallel_for_simd || DKind == OMPD_teams_distribute_parallel_for || DKind == OMPD_target_teams_distribute_parallel_for || DKind == OMPD_target_teams_distribute_parallel_for_simd; d507 6 a512 31 DKind == OMPD_parallel_for_simd || DKind == OMPD_parallel_sections || DKind == OMPD_target_parallel || DKind == OMPD_target_parallel_for || DKind == OMPD_distribute_parallel_for || DKind == OMPD_distribute_parallel_for_simd || DKind == OMPD_target_parallel_for_simd || DKind == OMPD_teams_distribute_parallel_for || DKind == OMPD_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_parallel_for || DKind == OMPD_target_teams_distribute_parallel_for_simd; } bool clang::isOpenMPTargetExecutionDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_target || DKind == OMPD_target_parallel || DKind == OMPD_target_parallel_for || DKind == OMPD_target_parallel_for_simd || DKind == OMPD_target_simd || DKind == OMPD_target_teams || DKind == OMPD_target_teams_distribute || DKind == OMPD_target_teams_distribute_parallel_for || DKind == OMPD_target_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_simd; } bool clang::isOpenMPTargetDataManagementDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_target_data || DKind == OMPD_target_enter_data || DKind == OMPD_target_exit_data || DKind == OMPD_target_update; } bool clang::isOpenMPNestingTeamsDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_teams || DKind == OMPD_teams_distribute || DKind == OMPD_teams_distribute_simd || DKind == OMPD_teams_distribute_parallel_for_simd || DKind == OMPD_teams_distribute_parallel_for; d516 1 a516 5 return isOpenMPNestingTeamsDirective(DKind) || DKind == OMPD_target_teams || DKind == OMPD_target_teams_distribute || DKind == OMPD_target_teams_distribute_parallel_for || DKind == OMPD_target_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_simd; d521 2 a522 14 DKind == OMPD_parallel_for_simd || DKind == OMPD_taskloop_simd || DKind == OMPD_distribute_parallel_for_simd || DKind == OMPD_distribute_simd || DKind == OMPD_target_simd || DKind == OMPD_teams_distribute_simd || DKind == OMPD_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_simd; } bool clang::isOpenMPNestingDistributeDirective(OpenMPDirectiveKind Kind) { return Kind == OMPD_distribute || Kind == OMPD_distribute_parallel_for || Kind == OMPD_distribute_parallel_for_simd || Kind == OMPD_distribute_simd; // TODO add next directives. d526 1 a526 8 return isOpenMPNestingDistributeDirective(Kind) || Kind == OMPD_teams_distribute || Kind == OMPD_teams_distribute_simd || Kind == OMPD_teams_distribute_parallel_for_simd || Kind == OMPD_teams_distribute_parallel_for || Kind == OMPD_target_teams_distribute || Kind == OMPD_target_teams_distribute_parallel_for || Kind == OMPD_target_teams_distribute_parallel_for_simd || Kind == OMPD_target_teams_distribute_simd; a538 16 bool clang::isOpenMPTaskingDirective(OpenMPDirectiveKind Kind) { return Kind == OMPD_task || isOpenMPTaskLoopDirective(Kind); } bool clang::isOpenMPLoopBoundSharingDirective(OpenMPDirectiveKind Kind) { return Kind == OMPD_distribute_parallel_for || Kind == OMPD_distribute_parallel_for_simd || Kind == OMPD_distribute_simd || Kind == OMPD_teams_distribute || Kind == OMPD_teams_distribute_simd || Kind == OMPD_teams_distribute_parallel_for_simd || Kind == OMPD_teams_distribute_parallel_for || Kind == OMPD_target_teams_distribute || Kind == OMPD_target_teams_distribute_parallel_for || Kind == OMPD_target_teams_distribute_parallel_for_simd || Kind == OMPD_target_teams_distribute_simd; } @ 1.1.1.7 log @Import Clang pre-4.0.0 r291444. @ text @a57 1 .Case("uniform", OMPC_uniform) a69 2 case OMPC_uniform: return "uniform"; a111 13 case OMPC_dist_schedule: return llvm::StringSwitch(Str) #define OPENMP_DIST_SCHEDULE_KIND(Name) .Case(#Name, OMPC_DIST_SCHEDULE_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_DIST_SCHEDULE_unknown); case OMPC_defaultmap: return llvm::StringSwitch(Str) #define OPENMP_DEFAULTMAP_KIND(Name) \ .Case(#Name, static_cast(OMPC_DEFAULTMAP_##Name)) #define OPENMP_DEFAULTMAP_MODIFIER(Name) \ .Case(#Name, static_cast(OMPC_DEFAULTMAP_MODIFIER_##Name)) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_DEFAULTMAP_unknown); a147 5 case OMPC_uniform: case OMPC_to: case OMPC_from: case OMPC_use_device_ptr: case OMPC_is_device_ptr: a221 24 case OMPC_dist_schedule: switch (Type) { case OMPC_DIST_SCHEDULE_unknown: return "unknown"; #define OPENMP_DIST_SCHEDULE_KIND(Name) \ case OMPC_DIST_SCHEDULE_##Name: \ return #Name; #include "clang/Basic/OpenMPKinds.def" } llvm_unreachable("Invalid OpenMP 'dist_schedule' clause type"); case OMPC_defaultmap: switch (Type) { case OMPC_DEFAULTMAP_unknown: case OMPC_DEFAULTMAP_MODIFIER_last: return "unknown"; #define OPENMP_DEFAULTMAP_KIND(Name) \ case OMPC_DEFAULTMAP_##Name: \ return #Name; #define OPENMP_DEFAULTMAP_MODIFIER(Name) \ case OMPC_DEFAULTMAP_MODIFIER_##Name: \ return #Name; #include "clang/Basic/OpenMPKinds.def" } llvm_unreachable("Invalid OpenMP 'schedule' clause type"); a257 5 case OMPC_uniform: case OMPC_to: case OMPC_from: case OMPC_use_device_ptr: case OMPC_is_device_ptr: a400 50 case OMPD_target_enter_data: switch (CKind) { #define OPENMP_TARGET_ENTER_DATA_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_exit_data: switch (CKind) { #define OPENMP_TARGET_EXIT_DATA_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_parallel: switch (CKind) { #define OPENMP_TARGET_PARALLEL_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_parallel_for: switch (CKind) { #define OPENMP_TARGET_PARALLEL_FOR_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_update: switch (CKind) { #define OPENMP_TARGET_UPDATE_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; a410 2 case OMPD_declare_simd: break; a470 132 case OMPD_distribute_parallel_for: switch (CKind) { #define OPENMP_DISTRIBUTE_PARALLEL_FOR_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_distribute_parallel_for_simd: switch (CKind) { #define OPENMP_DISTRIBUTE_PARALLEL_FOR_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_distribute_simd: switch (CKind) { #define OPENMP_DISTRIBUTE_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_parallel_for_simd: switch (CKind) { #define OPENMP_TARGET_PARALLEL_FOR_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_simd: switch (CKind) { #define OPENMP_TARGET_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_teams_distribute: switch (CKind) { #define OPENMP_TEAMS_DISTRIBUTE_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_teams_distribute_simd: switch (CKind) { #define OPENMP_TEAMS_DISTRIBUTE_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_teams_distribute_parallel_for_simd: switch (CKind) { #define OPENMP_TEAMS_DISTRIBUTE_PARALLEL_FOR_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_teams_distribute_parallel_for: switch (CKind) { #define OPENMP_TEAMS_DISTRIBUTE_PARALLEL_FOR_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_teams: switch (CKind) { #define OPENMP_TARGET_TEAMS_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_teams_distribute: switch (CKind) { #define OPENMP_TARGET_TEAMS_DISTRIBUTE_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_teams_distribute_parallel_for: switch (CKind) { #define OPENMP_TARGET_TEAMS_DISTRIBUTE_PARALLEL_FOR_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_target_teams_distribute_parallel_for_simd: switch (CKind) { #define OPENMP_TARGET_TEAMS_DISTRIBUTE_PARALLEL_FOR_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_declare_target: case OMPD_end_declare_target: a479 1 case OMPD_declare_reduction: d488 3 a490 13 DKind == OMPD_taskloop || DKind == OMPD_taskloop_simd || DKind == OMPD_distribute || DKind == OMPD_target_parallel_for || DKind == OMPD_distribute_parallel_for || DKind == OMPD_distribute_parallel_for_simd || DKind == OMPD_distribute_simd || DKind == OMPD_target_parallel_for_simd || DKind == OMPD_target_simd || DKind == OMPD_teams_distribute || DKind == OMPD_teams_distribute_simd || DKind == OMPD_teams_distribute_parallel_for_simd || DKind == OMPD_teams_distribute_parallel_for || DKind == OMPD_target_teams_distribute || DKind == OMPD_target_teams_distribute_parallel_for || DKind == OMPD_target_teams_distribute_parallel_for_simd; d497 2 a498 9 DKind == OMPD_parallel_for_simd || DKind == OMPD_parallel_sections || DKind == OMPD_target_parallel_for || DKind == OMPD_distribute_parallel_for || DKind == OMPD_distribute_parallel_for_simd || DKind == OMPD_target_parallel_for_simd || DKind == OMPD_teams_distribute_parallel_for_simd || DKind == OMPD_teams_distribute_parallel_for || DKind == OMPD_target_teams_distribute_parallel_for || DKind == OMPD_target_teams_distribute_parallel_for_simd; d507 6 a512 30 DKind == OMPD_parallel_for_simd || DKind == OMPD_parallel_sections || DKind == OMPD_target_parallel || DKind == OMPD_target_parallel_for || DKind == OMPD_distribute_parallel_for || DKind == OMPD_distribute_parallel_for_simd || DKind == OMPD_target_parallel_for_simd || DKind == OMPD_teams_distribute_parallel_for || DKind == OMPD_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_parallel_for || DKind == OMPD_target_teams_distribute_parallel_for_simd; } bool clang::isOpenMPTargetExecutionDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_target || DKind == OMPD_target_parallel || DKind == OMPD_target_parallel_for || DKind == OMPD_target_parallel_for_simd || DKind == OMPD_target_simd || DKind == OMPD_target_teams || DKind == OMPD_target_teams_distribute || DKind == OMPD_target_teams_distribute_parallel_for || DKind == OMPD_target_teams_distribute_parallel_for_simd; } bool clang::isOpenMPTargetDataManagementDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_target_data || DKind == OMPD_target_enter_data || DKind == OMPD_target_exit_data || DKind == OMPD_target_update; } bool clang::isOpenMPNestingTeamsDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_teams || DKind == OMPD_teams_distribute || DKind == OMPD_teams_distribute_simd || DKind == OMPD_teams_distribute_parallel_for_simd || DKind == OMPD_teams_distribute_parallel_for; d516 1 a516 4 return isOpenMPNestingTeamsDirective(DKind) || DKind == OMPD_target_teams || DKind == OMPD_target_teams_distribute || DKind == OMPD_target_teams_distribute_parallel_for || DKind == OMPD_target_teams_distribute_parallel_for_simd; d521 2 a522 13 DKind == OMPD_parallel_for_simd || DKind == OMPD_taskloop_simd || DKind == OMPD_distribute_parallel_for_simd || DKind == OMPD_distribute_simd || DKind == OMPD_target_simd || DKind == OMPD_teams_distribute_simd || DKind == OMPD_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_parallel_for_simd; } bool clang::isOpenMPNestingDistributeDirective(OpenMPDirectiveKind Kind) { return Kind == OMPD_distribute || Kind == OMPD_distribute_parallel_for || Kind == OMPD_distribute_parallel_for_simd || Kind == OMPD_distribute_simd; // TODO add next directives. d526 1 a526 7 return isOpenMPNestingDistributeDirective(Kind) || Kind == OMPD_teams_distribute || Kind == OMPD_teams_distribute_simd || Kind == OMPD_teams_distribute_parallel_for_simd || Kind == OMPD_teams_distribute_parallel_for || Kind == OMPD_target_teams_distribute || Kind == OMPD_target_teams_distribute_parallel_for || Kind == OMPD_target_teams_distribute_parallel_for_simd; a538 15 bool clang::isOpenMPTaskingDirective(OpenMPDirectiveKind Kind) { return Kind == OMPD_task || isOpenMPTaskLoopDirective(Kind); } bool clang::isOpenMPLoopBoundSharingDirective(OpenMPDirectiveKind Kind) { return Kind == OMPD_distribute_parallel_for || Kind == OMPD_distribute_parallel_for_simd || Kind == OMPD_distribute_simd || Kind == OMPD_teams_distribute || Kind == OMPD_teams_distribute_simd || Kind == OMPD_teams_distribute_parallel_for_simd || Kind == OMPD_teams_distribute_parallel_for || Kind == OMPD_target_teams_distribute || Kind == OMPD_target_teams_distribute_parallel_for || Kind == OMPD_target_teams_distribute_parallel_for_simd; } @ 1.1.1.7.2.1 log @Sync with HEAD @ text @a702 10 case OMPD_target_teams_distribute_simd: switch (CKind) { #define OPENMP_TARGET_TEAMS_DISTRIBUTE_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; d735 1 a735 2 DKind == OMPD_target_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_simd; d776 1 a776 2 DKind == OMPD_target_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_simd; d795 1 a795 2 DKind == OMPD_target_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_simd; d805 1 a805 2 DKind == OMPD_target_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_simd; d822 1 a822 2 Kind == OMPD_target_teams_distribute_parallel_for_simd || Kind == OMPD_target_teams_distribute_simd; d848 1 a848 2 Kind == OMPD_target_teams_distribute_parallel_for_simd || Kind == OMPD_target_teams_distribute_simd; @ 1.1.1.8 log @Import Clang 4.0RC1 r294123. @ text @a702 10 case OMPD_target_teams_distribute_simd: switch (CKind) { #define OPENMP_TARGET_TEAMS_DISTRIBUTE_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; d735 1 a735 2 DKind == OMPD_target_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_simd; d776 1 a776 2 DKind == OMPD_target_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_simd; d795 1 a795 2 DKind == OMPD_target_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_simd; d805 1 a805 2 DKind == OMPD_target_teams_distribute_parallel_for_simd || DKind == OMPD_target_teams_distribute_simd; d822 1 a822 2 Kind == OMPD_target_teams_distribute_parallel_for_simd || Kind == OMPD_target_teams_distribute_simd; d848 1 a848 2 Kind == OMPD_target_teams_distribute_parallel_for_simd || Kind == OMPD_target_teams_distribute_simd; @ 1.1.1.9 log @Import clang r309604 from branches/release_50 @ text @a140 1 case OMPC_task_reduction: a279 1 case OMPC_task_reduction: a712 10 case OMPD_taskgroup: switch (CKind) { #define OPENMP_TASKGROUP_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; d722 1 d843 1 a843 2 Kind == OMPC_reduction || Kind == OMPC_task_reduction; // TODO add next clauses like 'reduction'. d857 2 d861 1 d863 2 a864 74 Kind == OMPD_target_teams_distribute_parallel_for_simd; } void clang::getOpenMPCaptureRegions( SmallVectorImpl &CaptureRegions, OpenMPDirectiveKind DKind) { assert(DKind <= OMPD_unknown); switch (DKind) { case OMPD_parallel: case OMPD_parallel_for: case OMPD_parallel_for_simd: case OMPD_parallel_sections: case OMPD_distribute_parallel_for: CaptureRegions.push_back(OMPD_parallel); break; case OMPD_target_teams: CaptureRegions.push_back(OMPD_target); CaptureRegions.push_back(OMPD_teams); break; case OMPD_teams: case OMPD_simd: case OMPD_for: case OMPD_for_simd: case OMPD_sections: case OMPD_section: case OMPD_single: case OMPD_master: case OMPD_critical: case OMPD_taskgroup: case OMPD_distribute: case OMPD_ordered: case OMPD_atomic: case OMPD_target_data: case OMPD_target: case OMPD_target_parallel_for: case OMPD_target_parallel_for_simd: case OMPD_target_simd: case OMPD_task: case OMPD_taskloop: case OMPD_taskloop_simd: case OMPD_distribute_parallel_for_simd: case OMPD_distribute_simd: case OMPD_teams_distribute: case OMPD_teams_distribute_simd: case OMPD_teams_distribute_parallel_for_simd: case OMPD_teams_distribute_parallel_for: case OMPD_target_teams_distribute: case OMPD_target_teams_distribute_parallel_for: case OMPD_target_teams_distribute_parallel_for_simd: case OMPD_target_teams_distribute_simd: CaptureRegions.push_back(DKind); break; case OMPD_target_parallel: CaptureRegions.push_back(OMPD_target); CaptureRegions.push_back(OMPD_parallel); break; case OMPD_threadprivate: case OMPD_taskyield: case OMPD_barrier: case OMPD_taskwait: case OMPD_cancellation_point: case OMPD_cancel: case OMPD_flush: case OMPD_target_enter_data: case OMPD_target_exit_data: case OMPD_declare_reduction: case OMPD_declare_simd: case OMPD_declare_target: case OMPD_end_declare_target: case OMPD_target_update: llvm_unreachable("OpenMP Directive is not allowed"); case OMPD_unknown: llvm_unreachable("Unknown OpenMP directive"); } @ 1.1.1.9.4.1 log @Sync with HEAD @ text @d10 1 a10 1 /// This file implements the OpenMP enum and support functions. a141 1 case OMPC_in_reduction: a281 1 case OMPC_in_reduction: d794 1 a794 1 DKind == OMPD_target_parallel_for || d830 1 a830 2 DKind == OMPD_target_teams_distribute_simd || DKind == OMPD_target_parallel_for_simd; d854 2 a855 2 Kind == OMPC_reduction || Kind == OMPC_task_reduction || Kind == OMPC_in_reduction; // TODO add next clauses like 'reduction'. a884 1 case OMPD_distribute_parallel_for_simd: a887 3 case OMPD_target_teams_distribute: case OMPD_target_teams_distribute_simd: CaptureRegions.push_back(OMPD_task); a891 38 case OMPD_teams_distribute: case OMPD_teams_distribute_simd: CaptureRegions.push_back(OMPD_teams); break; case OMPD_target: case OMPD_target_simd: CaptureRegions.push_back(OMPD_task); CaptureRegions.push_back(OMPD_target); break; case OMPD_teams_distribute_parallel_for: case OMPD_teams_distribute_parallel_for_simd: CaptureRegions.push_back(OMPD_teams); CaptureRegions.push_back(OMPD_parallel); break; case OMPD_target_parallel: case OMPD_target_parallel_for: case OMPD_target_parallel_for_simd: CaptureRegions.push_back(OMPD_task); CaptureRegions.push_back(OMPD_target); CaptureRegions.push_back(OMPD_parallel); break; case OMPD_task: case OMPD_target_enter_data: case OMPD_target_exit_data: case OMPD_target_update: CaptureRegions.push_back(OMPD_task); break; case OMPD_taskloop: case OMPD_taskloop_simd: CaptureRegions.push_back(OMPD_taskloop); break; case OMPD_target_teams_distribute_parallel_for: case OMPD_target_teams_distribute_parallel_for_simd: CaptureRegions.push_back(OMPD_task); CaptureRegions.push_back(OMPD_target); CaptureRegions.push_back(OMPD_teams); CaptureRegions.push_back(OMPD_parallel); break; d905 8 d914 13 a926 1 CaptureRegions.push_back(OMPD_unknown); d935 2 d941 1 @ 1.1.1.9.4.2 log @Mostly merge changes from HEAD upto 20200411 @ text @@ 1.1.1.9.2.1 log @Sync with HEAD @ text @d10 1 a10 1 /// This file implements the OpenMP enum and support functions. a141 1 case OMPC_in_reduction: a281 1 case OMPC_in_reduction: d794 1 a794 1 DKind == OMPD_target_parallel_for || d830 1 a830 2 DKind == OMPD_target_teams_distribute_simd || DKind == OMPD_target_parallel_for_simd; d854 2 a855 2 Kind == OMPC_reduction || Kind == OMPC_task_reduction || Kind == OMPC_in_reduction; // TODO add next clauses like 'reduction'. a884 1 case OMPD_distribute_parallel_for_simd: a887 3 case OMPD_target_teams_distribute: case OMPD_target_teams_distribute_simd: CaptureRegions.push_back(OMPD_task); a891 38 case OMPD_teams_distribute: case OMPD_teams_distribute_simd: CaptureRegions.push_back(OMPD_teams); break; case OMPD_target: case OMPD_target_simd: CaptureRegions.push_back(OMPD_task); CaptureRegions.push_back(OMPD_target); break; case OMPD_teams_distribute_parallel_for: case OMPD_teams_distribute_parallel_for_simd: CaptureRegions.push_back(OMPD_teams); CaptureRegions.push_back(OMPD_parallel); break; case OMPD_target_parallel: case OMPD_target_parallel_for: case OMPD_target_parallel_for_simd: CaptureRegions.push_back(OMPD_task); CaptureRegions.push_back(OMPD_target); CaptureRegions.push_back(OMPD_parallel); break; case OMPD_task: case OMPD_target_enter_data: case OMPD_target_exit_data: case OMPD_target_update: CaptureRegions.push_back(OMPD_task); break; case OMPD_taskloop: case OMPD_taskloop_simd: CaptureRegions.push_back(OMPD_taskloop); break; case OMPD_target_teams_distribute_parallel_for: case OMPD_target_teams_distribute_parallel_for_simd: CaptureRegions.push_back(OMPD_task); CaptureRegions.push_back(OMPD_target); CaptureRegions.push_back(OMPD_teams); CaptureRegions.push_back(OMPD_parallel); break; d905 8 d914 13 a926 1 CaptureRegions.push_back(OMPD_unknown); d935 2 d941 1 @ 1.1.1.10 log @Import clang r337282 from trunk @ text @d10 1 a10 1 /// This file implements the OpenMP enum and support functions. a141 1 case OMPC_in_reduction: a281 1 case OMPC_in_reduction: d794 1 a794 1 DKind == OMPD_target_parallel_for || d830 1 a830 2 DKind == OMPD_target_teams_distribute_simd || DKind == OMPD_target_parallel_for_simd; d854 2 a855 2 Kind == OMPC_reduction || Kind == OMPC_task_reduction || Kind == OMPC_in_reduction; // TODO add next clauses like 'reduction'. a884 1 case OMPD_distribute_parallel_for_simd: a887 3 case OMPD_target_teams_distribute: case OMPD_target_teams_distribute_simd: CaptureRegions.push_back(OMPD_task); a891 38 case OMPD_teams_distribute: case OMPD_teams_distribute_simd: CaptureRegions.push_back(OMPD_teams); break; case OMPD_target: case OMPD_target_simd: CaptureRegions.push_back(OMPD_task); CaptureRegions.push_back(OMPD_target); break; case OMPD_teams_distribute_parallel_for: case OMPD_teams_distribute_parallel_for_simd: CaptureRegions.push_back(OMPD_teams); CaptureRegions.push_back(OMPD_parallel); break; case OMPD_target_parallel: case OMPD_target_parallel_for: case OMPD_target_parallel_for_simd: CaptureRegions.push_back(OMPD_task); CaptureRegions.push_back(OMPD_target); CaptureRegions.push_back(OMPD_parallel); break; case OMPD_task: case OMPD_target_enter_data: case OMPD_target_exit_data: case OMPD_target_update: CaptureRegions.push_back(OMPD_task); break; case OMPD_taskloop: case OMPD_taskloop_simd: CaptureRegions.push_back(OMPD_taskloop); break; case OMPD_target_teams_distribute_parallel_for: case OMPD_target_teams_distribute_parallel_for_simd: CaptureRegions.push_back(OMPD_task); CaptureRegions.push_back(OMPD_target); CaptureRegions.push_back(OMPD_teams); CaptureRegions.push_back(OMPD_parallel); break; d905 8 d914 13 a926 1 CaptureRegions.push_back(OMPD_unknown); d935 2 d941 1 @ 1.1.1.11 log @Mark old LLVM instance as dead. @ text @@ 1.1.1.4.4.1 log @file OpenMPKinds.cpp was added on branch tls-maxphys on 2014-08-19 23:47:26 +0000 @ text @d1 331 @ 1.1.1.4.4.2 log @Rebase to HEAD as of a few days ago. @ text @a0 331 //===--- OpenMPKinds.cpp - Token Kinds Support ----------------------------===// // // The LLVM Compiler Infrastructure // // This file is distributed under the University of Illinois Open Source // License. See LICENSE.TXT for details. // //===----------------------------------------------------------------------===// /// \file /// \brief This file implements the OpenMP enum and support functions. /// //===----------------------------------------------------------------------===// #include "clang/Basic/OpenMPKinds.h" #include "clang/Basic/IdentifierTable.h" #include "llvm/ADT/StringRef.h" #include "llvm/ADT/StringSwitch.h" #include "llvm/Support/ErrorHandling.h" #include using namespace clang; OpenMPDirectiveKind clang::getOpenMPDirectiveKind(StringRef Str) { return llvm::StringSwitch(Str) #define OPENMP_DIRECTIVE(Name) .Case(#Name, OMPD_##Name) #define OPENMP_DIRECTIVE_EXT(Name, Str) .Case(Str, OMPD_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPD_unknown); } const char *clang::getOpenMPDirectiveName(OpenMPDirectiveKind Kind) { assert(Kind <= OMPD_unknown); switch (Kind) { case OMPD_unknown: return "unknown"; #define OPENMP_DIRECTIVE(Name) \ case OMPD_##Name: \ return #Name; #define OPENMP_DIRECTIVE_EXT(Name, Str) \ case OMPD_##Name: \ return Str; #include "clang/Basic/OpenMPKinds.def" break; } llvm_unreachable("Invalid OpenMP directive kind"); } OpenMPClauseKind clang::getOpenMPClauseKind(StringRef Str) { // 'flush' clause cannot be specified explicitly, because this is an implicit // clause for 'flush' directive. If the 'flush' clause is explicitly specified // the Parser should generate a warning about extra tokens at the end of the // directive. if (Str == "flush") return OMPC_unknown; return llvm::StringSwitch(Str) #define OPENMP_CLAUSE(Name, Class) .Case(#Name, OMPC_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_unknown); } const char *clang::getOpenMPClauseName(OpenMPClauseKind Kind) { assert(Kind <= OMPC_unknown); switch (Kind) { case OMPC_unknown: return "unknown"; #define OPENMP_CLAUSE(Name, Class) \ case OMPC_##Name: \ return #Name; #include "clang/Basic/OpenMPKinds.def" case OMPC_threadprivate: return "threadprivate or thread local"; } llvm_unreachable("Invalid OpenMP clause kind"); } unsigned clang::getOpenMPSimpleClauseType(OpenMPClauseKind Kind, StringRef Str) { switch (Kind) { case OMPC_default: return llvm::StringSwitch(Str) #define OPENMP_DEFAULT_KIND(Name) .Case(#Name, OMPC_DEFAULT_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_DEFAULT_unknown); case OMPC_proc_bind: return llvm::StringSwitch(Str) #define OPENMP_PROC_BIND_KIND(Name) .Case(#Name, OMPC_PROC_BIND_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_PROC_BIND_unknown); case OMPC_schedule: return llvm::StringSwitch(Str) #define OPENMP_SCHEDULE_KIND(Name) .Case(#Name, OMPC_SCHEDULE_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_SCHEDULE_unknown); case OMPC_unknown: case OMPC_threadprivate: case OMPC_if: case OMPC_final: case OMPC_num_threads: case OMPC_safelen: case OMPC_collapse: case OMPC_private: case OMPC_firstprivate: case OMPC_lastprivate: case OMPC_shared: case OMPC_reduction: case OMPC_linear: case OMPC_aligned: case OMPC_copyin: case OMPC_copyprivate: case OMPC_ordered: case OMPC_nowait: case OMPC_untied: case OMPC_mergeable: case OMPC_flush: case OMPC_read: case OMPC_write: case OMPC_update: case OMPC_capture: case OMPC_seq_cst: break; } llvm_unreachable("Invalid OpenMP simple clause kind"); } const char *clang::getOpenMPSimpleClauseTypeName(OpenMPClauseKind Kind, unsigned Type) { switch (Kind) { case OMPC_default: switch (Type) { case OMPC_DEFAULT_unknown: return "unknown"; #define OPENMP_DEFAULT_KIND(Name) \ case OMPC_DEFAULT_##Name: \ return #Name; #include "clang/Basic/OpenMPKinds.def" } llvm_unreachable("Invalid OpenMP 'default' clause type"); case OMPC_proc_bind: switch (Type) { case OMPC_PROC_BIND_unknown: return "unknown"; #define OPENMP_PROC_BIND_KIND(Name) \ case OMPC_PROC_BIND_##Name: \ return #Name; #include "clang/Basic/OpenMPKinds.def" } llvm_unreachable("Invalid OpenMP 'proc_bind' clause type"); case OMPC_schedule: switch (Type) { case OMPC_SCHEDULE_unknown: return "unknown"; #define OPENMP_SCHEDULE_KIND(Name) \ case OMPC_SCHEDULE_##Name: \ return #Name; #include "clang/Basic/OpenMPKinds.def" } llvm_unreachable("Invalid OpenMP 'schedule' clause type"); case OMPC_unknown: case OMPC_threadprivate: case OMPC_if: case OMPC_final: case OMPC_num_threads: case OMPC_safelen: case OMPC_collapse: case OMPC_private: case OMPC_firstprivate: case OMPC_lastprivate: case OMPC_shared: case OMPC_reduction: case OMPC_linear: case OMPC_aligned: case OMPC_copyin: case OMPC_copyprivate: case OMPC_ordered: case OMPC_nowait: case OMPC_untied: case OMPC_mergeable: case OMPC_flush: case OMPC_read: case OMPC_write: case OMPC_update: case OMPC_capture: case OMPC_seq_cst: break; } llvm_unreachable("Invalid OpenMP simple clause kind"); } bool clang::isAllowedClauseForDirective(OpenMPDirectiveKind DKind, OpenMPClauseKind CKind) { assert(DKind <= OMPD_unknown); assert(CKind <= OMPC_unknown); switch (DKind) { case OMPD_parallel: switch (CKind) { #define OPENMP_PARALLEL_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_simd: switch (CKind) { #define OPENMP_SIMD_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_for: switch (CKind) { #define OPENMP_FOR_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_sections: switch (CKind) { #define OPENMP_SECTIONS_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_single: switch (CKind) { #define OPENMP_SINGLE_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_parallel_for: switch (CKind) { #define OPENMP_PARALLEL_FOR_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_parallel_sections: switch (CKind) { #define OPENMP_PARALLEL_SECTIONS_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_task: switch (CKind) { #define OPENMP_TASK_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_flush: return CKind == OMPC_flush; break; case OMPD_atomic: switch (CKind) { #define OPENMP_ATOMIC_CLAUSE(Name) \ case OMPC_##Name: \ return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_unknown: case OMPD_threadprivate: case OMPD_section: case OMPD_master: case OMPD_critical: case OMPD_taskyield: case OMPD_barrier: case OMPD_taskwait: case OMPD_ordered: break; } return false; } bool clang::isOpenMPLoopDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_simd || DKind == OMPD_for || DKind == OMPD_parallel_for; // TODO add next directives. } bool clang::isOpenMPWorksharingDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_for || DKind == OMPD_sections || DKind == OMPD_section || DKind == OMPD_single || DKind == OMPD_parallel_for || DKind == OMPD_parallel_sections; // TODO add next directives. } bool clang::isOpenMPParallelDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_parallel || DKind == OMPD_parallel_for || DKind == OMPD_parallel_sections; // TODO add next directives. } bool clang::isOpenMPSimdDirective(OpenMPDirectiveKind DKind) { return DKind == OMPD_simd; // TODO || DKind == OMPD_for_simd || ... } bool clang::isOpenMPPrivate(OpenMPClauseKind Kind) { return Kind == OMPC_private || Kind == OMPC_firstprivate || Kind == OMPC_lastprivate || Kind == OMPC_linear || Kind == OMPC_reduction; // TODO add next clauses like 'reduction'. } bool clang::isOpenMPThreadPrivate(OpenMPClauseKind Kind) { return Kind == OMPC_threadprivate || Kind == OMPC_copyin; // TODO add next clauses like 'copyprivate'. } @ 1.1.1.2.4.1 log @file OpenMPKinds.cpp was added on branch yamt-pagecache on 2014-05-22 16:18:26 +0000 @ text @d1 144 @ 1.1.1.2.4.2 log @sync with head. for a reference, the tree before this commit was tagged as yamt-pagecache-tag8. this commit was splitted into small chunks to avoid a limitation of cvs. ("Protocol error: too many arguments") @ text @a0 144 //===--- OpenMPKinds.cpp - Token Kinds Support ----------------------------===// // // The LLVM Compiler Infrastructure // // This file is distributed under the University of Illinois Open Source // License. See LICENSE.TXT for details. // //===----------------------------------------------------------------------===// /// \file /// \brief This file implements the OpenMP enum and support functions. /// //===----------------------------------------------------------------------===// #include "clang/Basic/OpenMPKinds.h" #include "clang/Basic/IdentifierTable.h" #include "llvm/ADT/StringRef.h" #include "llvm/ADT/StringSwitch.h" #include "llvm/Support/ErrorHandling.h" #include using namespace clang; OpenMPDirectiveKind clang::getOpenMPDirectiveKind(StringRef Str) { return llvm::StringSwitch(Str) #define OPENMP_DIRECTIVE(Name) \ .Case(#Name, OMPD_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPD_unknown); } const char *clang::getOpenMPDirectiveName(OpenMPDirectiveKind Kind) { assert(Kind < NUM_OPENMP_DIRECTIVES); switch (Kind) { case OMPD_unknown: return "unknown"; #define OPENMP_DIRECTIVE(Name) \ case OMPD_##Name : return #Name; #include "clang/Basic/OpenMPKinds.def" case NUM_OPENMP_DIRECTIVES: break; } llvm_unreachable("Invalid OpenMP directive kind"); } OpenMPClauseKind clang::getOpenMPClauseKind(StringRef Str) { return llvm::StringSwitch(Str) #define OPENMP_CLAUSE(Name, Class) \ .Case(#Name, OMPC_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_unknown); } const char *clang::getOpenMPClauseName(OpenMPClauseKind Kind) { assert(Kind < NUM_OPENMP_CLAUSES); switch (Kind) { case OMPC_unknown: return "unknown"; #define OPENMP_CLAUSE(Name, Class) \ case OMPC_##Name : return #Name; #include "clang/Basic/OpenMPKinds.def" case OMPC_threadprivate: return "threadprivate or thread local"; case NUM_OPENMP_CLAUSES: break; } llvm_unreachable("Invalid OpenMP clause kind"); } unsigned clang::getOpenMPSimpleClauseType(OpenMPClauseKind Kind, StringRef Str) { switch (Kind) { case OMPC_default: return llvm::StringSwitch(Str) #define OPENMP_DEFAULT_KIND(Name) \ .Case(#Name, OMPC_DEFAULT_##Name) #include "clang/Basic/OpenMPKinds.def" .Default(OMPC_DEFAULT_unknown); case OMPC_unknown: case OMPC_threadprivate: case OMPC_if: case OMPC_private: case OMPC_firstprivate: case OMPC_shared: case NUM_OPENMP_CLAUSES: break; } llvm_unreachable("Invalid OpenMP simple clause kind"); } const char *clang::getOpenMPSimpleClauseTypeName(OpenMPClauseKind Kind, unsigned Type) { switch (Kind) { case OMPC_default: switch (Type) { case OMPC_DEFAULT_unknown: return "unknown"; #define OPENMP_DEFAULT_KIND(Name) \ case OMPC_DEFAULT_##Name : return #Name; #include "clang/Basic/OpenMPKinds.def" } llvm_unreachable("Invalid OpenMP 'default' clause type"); case OMPC_unknown: case OMPC_threadprivate: case OMPC_if: case OMPC_private: case OMPC_firstprivate: case OMPC_shared: case NUM_OPENMP_CLAUSES: break; } llvm_unreachable("Invalid OpenMP simple clause kind"); } bool clang::isAllowedClauseForDirective(OpenMPDirectiveKind DKind, OpenMPClauseKind CKind) { assert(DKind < NUM_OPENMP_DIRECTIVES); assert(CKind < NUM_OPENMP_CLAUSES); switch (DKind) { case OMPD_parallel: switch (CKind) { #define OPENMP_PARALLEL_CLAUSE(Name) \ case OMPC_##Name: return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_simd: switch (CKind) { #define OPENMP_SIMD_CLAUSE(Name) \ case OMPC_##Name: return true; #include "clang/Basic/OpenMPKinds.def" default: break; } break; case OMPD_unknown: case OMPD_threadprivate: case OMPD_task: case NUM_OPENMP_DIRECTIVES: break; } return false; } @