From 83c451e9986e2d2ccd28395595465d69f0d4db6e Mon Sep 17 00:00:00 2001 From: Kelvin Li Date: Sun, 25 Dec 2016 04:52:54 +0000 Subject: [OpenMP] Sema and parsing for 'target teams distribute' pragma This patch is to implement sema and parsing for 'target teams distribute' pragma. Differential Revision: https://reviews.llvm.org/D28015 llvm-svn: 290508 --- .../target_teams_distribute_default_messages.cpp | 23 ++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 clang/test/OpenMP/target_teams_distribute_default_messages.cpp (limited to 'clang/test/OpenMP/target_teams_distribute_default_messages.cpp') diff --git a/clang/test/OpenMP/target_teams_distribute_default_messages.cpp b/clang/test/OpenMP/target_teams_distribute_default_messages.cpp new file mode 100644 index 00000000000..1bd10676978 --- /dev/null +++ b/clang/test/OpenMP/target_teams_distribute_default_messages.cpp @@ -0,0 +1,23 @@ +// RUN: %clang_cc1 -verify -fopenmp %s + +void foo(); + +int main(int argc, char **argv) { + #pragma omp target teams distribute default // expected-error {{expected '(' after 'default'}} + for (int i=0; i<200; i++) foo(); + #pragma omp target teams distribute default ( // expected-error {{expected 'none' or 'shared' in OpenMP clause 'default'}} expected-error {{expected ')'}} expected-note {{to match this '('}} + for (int i=0; i<200; i++) foo(); + #pragma omp target teams distribute default () // expected-error {{expected 'none' or 'shared' in OpenMP clause 'default'}} + for (int i=0; i<200; i++) foo(); + #pragma omp target teams distribute default (none // expected-error {{expected ')'}} expected-note {{to match this '('}} + for (int i=0; i<200; i++) foo(); + #pragma omp target teams distribute default (shared), default(shared) // expected-error {{directive '#pragma omp target teams distribute' cannot contain more than one 'default' clause}} + for (int i=0; i<200; i++) foo(); + #pragma omp target teams distribute default (x) // expected-error {{expected 'none' or 'shared' in OpenMP clause 'default'}} + for (int i=0; i<200; i++) foo(); + + #pragma omp target teams distribute default(none) + for (int i=0; i<200; i++) ++argc; // expected-error {{variable 'argc' must have explicitly specified data sharing attributes}} + + return 0; +} -- cgit v1.2.3