test/OpenMP/target_teams_firstprivate_messages.cpp

   1 // RUN: %clang_cc1 -verify -fopenmp %s
   2
   3 void foo() {
   4 }
   5
   6 bool foobool(int argc) {
   7   return argc;
   8 }
   9
  10 struct S1; // expected-note {{declared here}} expected-note{{forward declaration of 'S1'}}
  11 extern S1 a;
  12 class S2 {
  13   mutable int a;
  14
  15 public:
  16   S2() : a(0) {}
  17   S2(const S2 &s2) : a(s2.a) {}
  18   static float S2s;
  19   static const float S2sc;
  20 };
  21 const float S2::S2sc = 0;
  22 const S2 b;
  23 const S2 ba[5];
  24 class S3 {
  25   int a;
  26
  27 public:
  28   S3() : a(0) {}
  29   S3(const S3 &s3) : a(s3.a) {}
  30 };
  31 const S3 c;
  32 const S3 ca[5];
  33 extern const int f;
  34 class S4 {
  35   int a;
  36   S4();
  37   S4(const S4 &s4); // expected-note {{implicitly declared private here}}
  38 public:
  39   S4(int v) : a(v) {}
  40 };
  41 class S5 {
  42   int a;
  43   S5() : a(0) {}
  44   S5(const S5 &s5) : a(s5.a) {} // expected-note {{implicitly declared private here}}
  45 public:
  46   S5(int v) : a(v) {}
  47 };
  48
  49 S3 h;
  50 #pragma omp threadprivate(h) // expected-note {{defined as threadprivate or thread local}}
  51
  52 namespace A {
  53 double x;
  54 #pragma omp threadprivate(x) // expected-note {{defined as threadprivate or thread local}}
  55 }
  56 namespace B {
  57 using A::x;
  58 }
  59
  60 int main(int argc, char **argv) {
  61   const int d = 5;
  62   const int da[5] = {0};
  63   S4 e(4);
  64   S5 g(5);
  65   int i;
  66   int &j = i;
  67 #pragma omp target teams firstprivate // expected-error {{expected '(' after 'firstprivate'}}
  68   foo();
  69 #pragma omp target teams firstprivate( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
  70   foo();
  71 #pragma omp target teams firstprivate() // expected-error {{expected expression}}
  72   foo();
  73 #pragma omp target teams firstprivate(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
  74   foo();
  75 #pragma omp target teams firstprivate(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
  76   foo();
  77 #pragma omp target teams firstprivate(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
  78   foo();
  79 #pragma omp target teams firstprivate(argc)
  80   foo();
  81 #pragma omp target teams firstprivate(S1) // expected-error {{'S1' does not refer to a value}}
  82   foo();
  83 #pragma omp target teams firstprivate(a, b, c, d, f) // expected-error {{firstprivate variable with incomplete type 'S1'}}
  84   foo();
  85 #pragma omp target teams firstprivate(argv[1]) // expected-error {{expected variable name}}
  86   foo();
  87 #pragma omp target teams firstprivate(ba)
  88   foo();
  89 #pragma omp target teams firstprivate(ca)
  90   foo();
  91 #pragma omp target teams firstprivate(da)
  92   foo();
  93 #pragma omp target teams firstprivate(S2::S2s)
  94   foo();
  95 #pragma omp target teams firstprivate(S2::S2sc)
  96   foo();
  97 #pragma omp target teams firstprivate(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}}
  98   foo();
  99 #pragma omp target teams firstprivate(h, B::x) // expected-error 2 {{threadprivate or thread local variable cannot be firstprivate}}
 100   foo();
 101 #pragma omp target teams private(i), firstprivate(i) // expected-error {{private variable cannot be firstprivate}} expected-note{{defined as private}}
 102   foo();
 103 #pragma omp target teams shared(i)
 104   foo();
 105 #pragma omp target teams firstprivate(i)
 106   foo();
 107 #pragma omp target teams firstprivate(j)
 108   foo();
 109   static int m;
 110 #pragma omp target teams firstprivate(m) // OK
 111   foo();
 112
 113   return 0;
 114 }