1 // RUN: %clang_cc1 -verify -fopenmp %s -Wuninitialized 2 3 // RUN: %clang_cc1 -verify -fopenmp-simd %s -Wuninitialized 4 5 // RUN: %clang_cc1 -verify -fopenmp-version=51 -DOMP51 -fopenmp %s -Wuninitialized 6 7 // RUN: %clang_cc1 -verify -fopenmp-version=51 -DOMP51 -fopenmp-simd %s -Wuninitialized 8 9 void foo(); 10 11 namespace { 12 static int y = 0; 13 } 14 static int x = 0; 15 16 int main(int argc, char **argv) { 17 #pragma omp target 18 #pragma omp teams distribute parallel for default // expected-error {{expected '(' after 'default'}} 19 for (int i=0; i<200; i++) foo(); 20 #pragma omp target 21 #pragma omp teams distribute parallel for default( // expected-error {{expected 'none', 'shared', 'private' or 'firstprivate' in OpenMP clause 'default'}} expected-error {{expected ')'}} expected-note {{to match this '('}} 22 for (int i=0; i<200; i++) foo(); 23 #pragma omp target 24 #pragma omp teams distribute parallel for default() // expected-error {{expected 'none', 'shared', 'private' or 'firstprivate' in OpenMP clause 'default'}} 25 for (int i=0; i<200; i++) foo(); 26 #pragma omp target 27 #pragma omp teams distribute parallel for default (none // expected-error {{expected ')'}} expected-note {{to match this '('}} 28 for (int i=0; i<200; i++) foo(); 29 #pragma omp target 30 #pragma omp teams distribute parallel for default (shared), default(shared) // expected-error {{directive '#pragma omp teams distribute parallel for' cannot contain more than one 'default' clause}} 31 for (int i=0; i<200; i++) foo(); 32 #pragma omp target 33 #pragma omp teams distribute parallel for default(x) // expected-error {{expected 'none', 'shared', 'private' or 'firstprivate' in OpenMP clause 'default'}} 34 for (int i=0; i<200; i++) foo(); 35 36 #pragma omp target 37 #pragma omp teams distribute parallel for default(none) // expected-note {{explicit data sharing attribute requested here}} 38 for (int i=0; i<200; i++) ++argc; // expected-error {{variable 'argc' must have explicitly specified data sharing attributes}} 39 40 #ifdef OMP51 41 #pragma omp target 42 #pragma omp teams distribute parallel for default(firstprivate) // expected-note 2 {{explicit data sharing attribute requested here}} 43 for (int i = 0; i < 200; i++) { 44 ++x; // expected-error {{variable 'x' must have explicitly specified data sharing attributes}} 45 ++y; // expected-error {{variable 'y' must have explicitly specified data sharing attributes}} 46 } 47 #pragma omp target 48 #pragma omp teams distribute parallel for default(private) // expected-note 2 {{explicit data sharing attribute requested here}} 49 for (int i = 0; i < 200; i++) { 50 ++x; // expected-error {{variable 'x' must have explicitly specified data sharing attributes}} 51 ++y; // expected-error {{variable 'y' must have explicitly specified data sharing attributes}} 52 } 53 #endif 54 55 return 0; 56 } 57