brintos

brintos / llvm-project-archived public Read only

0
0
Text · 2.8 KiB · 9131a08 Raw
67 lines · cpp
1// RUN: %clang_cc1 -verify -fopenmp-version=51 -fopenmp -DOMP51 -o - %s -Wuninitialized2 3// RUN: %clang_cc1 -verify -fopenmp-version=51 -fopenmp-simd -DOMP51 -o - %s -Wuninitialized4 5// RUN: %clang_cc1 -verify -fopenmp-version=50 -fopenmp -o - %s -Wuninitialized6 7// RUN: %clang_cc1 -verify -fopenmp-version=50 -fopenmp-simd -o - %s -Wuninitialized8 9void foo();10 11namespace {12static int y = 0;13}14static int x = 0;15 16int main(int argc, char **argv) {17  #pragma omp target18  #pragma omp teams default // expected-error {{expected '(' after 'default'}}19  foo();20  #pragma omp target21#pragma omp teams default( // expected-error {{expected 'none', 'shared', 'private' or 'firstprivate' in OpenMP clause 'default'}} expected-error {{expected ')'}} expected-note {{to match this '('}}22  foo();23  #pragma omp target24#pragma omp teams default() // expected-error {{expected 'none', 'shared', 'private' or 'firstprivate' in OpenMP clause 'default'}}25  foo();26  #pragma omp target27  #pragma omp teams default (none // expected-error {{expected ')'}} expected-note {{to match this '('}}28  foo();29  #pragma omp target30  #pragma omp teams default (shared), default(shared) // expected-error {{directive '#pragma omp teams' cannot contain more than one 'default' clause}}31  foo();32  #pragma omp target33#pragma omp teams default(x) // expected-error {{expected 'none', 'shared', 'private' or 'firstprivate' in OpenMP clause 'default'}}34  foo();35 36  #pragma omp target37  #pragma omp teams default(none) // expected-note {{explicit data sharing attribute requested here}}38  ++argc; // expected-error {{variable 'argc' must have explicitly specified data sharing attributes}}39 40  #pragma omp target41  #pragma omp teams default(none) // expected-note {{explicit data sharing attribute requested here}}42  #pragma omp parallel default(shared)43  ++argc; // expected-error {{variable 'argc' must have explicitly specified data sharing attributes}}44 45  #pragma omp teams if(x) // expected-error {{unexpected OpenMP clause 'if' in directive '#pragma omp teams'}}46  foo();47 48#ifdef OMP5149#pragma omp target50#pragma omp teams default(firstprivate) // expected-note 2 {{explicit data sharing attribute requested here}}51  {52    ++x; // expected-error {{variable 'x' must have explicitly specified data sharing attributes}}53    ++y; // expected-error {{variable 'y' must have explicitly specified data sharing attributes}}54  }55#pragma omp target56#pragma omp teams default(private) // expected-note 2 {{explicit data sharing attribute requested here}}57  {58    ++x; // expected-error {{variable 'x' must have explicitly specified data sharing attributes}}59    ++y; // expected-error {{variable 'y' must have explicitly specified data sharing attributes}}60  }61#pragma omp teams if(x) // expected-error {{unexpected OpenMP clause 'if' in directive '#pragma omp teams'}}62  foo();63 64#endif65  return 0;66}67