clang/test/OpenMP/parallel_for_default_messages.cpp

   1 // RUN: %clang_cc1 -verify -fopenmp -fopenmp-version=50 -ferror-limit 100 -o - %s -Wuninitialized
   2
   3 // RUN: %clang_cc1 -verify -fopenmp-simd -fopenmp-version=50 -ferror-limit 100 -o - %s -Wuninitialized
   4
   5 // RUN: %clang_cc1 -verify -fopenmp -DOMP51 -ferror-limit 100 -o - %s -Wuninitialized
   6
   7 // RUN: %clang_cc1 -verify -fopenmp-simd -DOMP51 -ferror-limit 100 -o - %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   int i;
  18 #pragma omp parallel for default // expected-error {{expected '(' after 'default'}}
  19   for (i = 0; i < argc; ++i)
  20     foo();
  21 #pragma omp 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 (i = 0; i < argc; ++i)
  23     foo();
  24 #pragma omp parallel for default() // expected-error {{expected 'none', 'shared', 'private' or 'firstprivate' in OpenMP clause 'default'}}
  25   for (i = 0; i < argc; ++i)
  26     foo();
  27 #pragma omp parallel for default(none // expected-error {{expected ')'}} expected-note {{to match this '('}} expected-note {{explicit data sharing attribute requested here}}
  28   for (i = 0; i < argc; ++i) // expected-error {{variable 'argc' must have explicitly specified data sharing attributes}}
  29     foo();
  30 #pragma omp parallel for default(shared), default(shared) // expected-error {{directive '#pragma omp parallel for' cannot contain more than one 'default' clause}}
  31   for (i = 0; i < argc; ++i)
  32     foo();
  33 #pragma omp parallel for default(x) // expected-error {{expected 'none', 'shared', 'private' or 'firstprivate' in OpenMP clause 'default'}}
  34   for (i = 0; i < argc; ++i)
  35     foo();
  36
  37 #pragma omp parallel for default(none) // expected-note {{explicit data sharing attribute requested here}}
  38   for (i = 0; i < argc; ++i)  // expected-error {{variable 'argc' must have explicitly specified data sharing attributes}}
  39     foo();
  40
  41 #pragma omp parallel default(none) // expected-note {{explicit data sharing attribute requested here}}
  42 #pragma omp parallel for default(shared)
  43   for (i = 0; i < argc; ++i) // expected-error {{variable 'argc' must have explicitly specified data sharing attributes}}
  44     foo();
  45
  46 #ifdef OMP51
  47 #pragma omp parallel for default(firstprivate) // expected-note 2 {{explicit data sharing attribute requested here}}
  48   for (i = 0; i < argc; ++i) {
  49     ++y; // expected-error {{variable 'y' must have explicitly specified data sharing attributes}}
  50     ++x; // expected-error {{variable 'x' must have explicitly specified data sharing attributes}}
  51   }
  52 #pragma omp parallel for default(private) // expected-note 2 {{explicit data sharing attribute requested here}}
  53   for (i = 0; i < argc; ++i) {
  54     ++y; // expected-error {{variable 'y' must have explicitly specified data sharing attributes}}
  55     ++x; // expected-error {{variable 'x' must have explicitly specified data sharing attributes}}
  56   }
  57 #endif
  58
  59   return 0;
  60 }