clang/test/OpenMP/single_private_messages.cpp

   1 // RUN: %clang_cc1 -verify -fopenmp %s -Wuninitialized
   2
   3 // RUN: %clang_cc1 -verify -fopenmp-simd %s -Wuninitialized
   4
   5 extern int omp_default_mem_alloc;
   6 void foo() {
   7 }
   8
   9 bool foobool(int argc) {
  10   return argc;
  11 }
  12
  13 struct S1; // expected-note 2 {{declared here}} expected-note 2 {{forward declaration of 'S1'}}
  14 extern S1 a;
  15 class S2 {
  16   mutable int a;
  17
  18 public:
  19   S2() : a(0) {}
  20 };
  21 const S2 b;
  22 const S2 ba[5];
  23 class S3 {
  24   int a;
  25
  26 public:
  27   S3() : a(0) {}
  28 };
  29 const S3 ca[5];
  30 class S4 {
  31   int a;
  32   S4(); // expected-note {{implicitly declared private here}}
  33
  34 public:
  35   S4(int v) : a(v) {
  36 #pragma omp single private(a) private(this->a)
  37     for (int k = 0; k < v; ++k)
  38       ++this->a;
  39   }
  40 };
  41 class S5 {
  42   int a;
  43   S5() : a(0) {} // expected-note {{implicitly declared private here}}
  44
  45 public:
  46   S5(int v) : a(v) {}
  47   S5 &operator=(S5 &s) {
  48 #pragma omp single private(a) private(this->a) private(s.a) // expected-error {{expected variable name or data member of current class}}
  49     for (int k = 0; k < s.a; ++k)
  50       ++s.a;
  51     return *this;
  52   }
  53 };
  54
  55 template <typename T>
  56 class S6 {
  57 public:
  58   T a;
  59
  60   S6() : a(0) {}
  61   S6(T v) : a(v) {
  62 #pragma omp single private(a) private(this->a)
  63     for (int k = 0; k < v; ++k)
  64       ++this->a;
  65   }
  66   S6 &operator=(S6 &s) {
  67 #pragma omp single private(a) private(this->a) private(s.a) // expected-error {{expected variable name or data member of current class}}
  68     for (int k = 0; k < s.a; ++k)
  69       ++s.a;
  70     return *this;
  71   }
  72 };
  73
  74 template <typename T>
  75 class S7 : public T {
  76   T a;
  77   S7() : a(0) {}
  78
  79 public:
  80   S7(T v) : a(v) {
  81 #pragma omp single private(a) private(this->a) private(T::a)
  82     for (int k = 0; k < a.a; ++k)
  83       ++this->a.a;
  84   }
  85   S7 &operator=(S7 &s) {
  86 #pragma omp single private(a) private(this->a) private(s.a) private(s.T::a) // expected-error 2 {{expected variable name or data member of current class}}
  87     for (int k = 0; k < s.a.a; ++k)
  88       ++s.a.a;
  89     return *this;
  90   }
  91 };
  92
  93 S3 h;
  94 #pragma omp threadprivate(h) // expected-note 2 {{defined as threadprivate or thread local}}
  95
  96 template <class I, class C>
  97 int foomain(I argc, C **argv) {
  98   I e(4);
  99   I g(5);
 100   int i;
 101   int &j = i;
 102 #pragma omp single private // expected-error {{expected '(' after 'private'}}
 103   foo();
 104 #pragma omp single private( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
 105   foo();
 106 #pragma omp single private() // expected-error {{expected expression}}
 107   foo();
 108 #pragma omp single private(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
 109   foo();
 110 #pragma omp single private(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
 111   foo();
 112 #pragma omp single private(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
 113   foo();
 114 #pragma omp single private(argc) allocate , allocate(, allocate(omp_default , allocate(omp_default_mem_alloc, allocate(omp_default_mem_alloc:, allocate(omp_default_mem_alloc: argc, allocate(omp_default_mem_alloc: argv), allocate(argv) // expected-error {{expected '(' after 'allocate'}} expected-error 2 {{expected expression}} expected-error 2 {{expected ')'}} expected-error {{use of undeclared identifier 'omp_default'}} expected-note 2 {{to match this '('}}
 115   foo();
 116 #pragma omp single private(S1) // expected-error {{'S1' does not refer to a value}}
 117   foo();
 118 #pragma omp single private(a, b) // expected-error {{private variable with incomplete type 'S1'}}
 119   foo();
 120 #pragma omp single private(argv[1]) // expected-error {{expected variable name}}
 121   foo();
 122 #pragma omp single private(e, g)
 123   foo();
 124 #pragma omp single private(h) // expected-error {{threadprivate or thread local variable cannot be private}}
 125   foo();
 126 #pragma omp single shared(i) // expected-error {{unexpected OpenMP clause 'shared' in directive '#pragma omp single'}}
 127   foo();
 128 #pragma omp parallel
 129   {
 130     int v = 0;
 131     int i;
 132 #pragma omp single private(i)
 133     foo();
 134     v += i;
 135   }
 136 #pragma omp parallel shared(i)
 137 #pragma omp parallel private(i)
 138 #pragma omp single private(j)
 139   foo();
 140 #pragma omp single private(i)
 141   foo();
 142   return 0;
 143 }
 144
 145 namespace A {
 146 double x;
 147 #pragma omp threadprivate(x) // expected-note {{defined as threadprivate or thread local}}
 148 }
 149 namespace B {
 150 using A::x;
 151 }
 152
 153 int main(int argc, char **argv) {
 154   S4 e(4);
 155   S5 g(5);
 156   S6<float> s6(0.0) , s6_0(1.0);
 157   S7<S6<float> > s7(0.0) , s7_0(1.0);
 158   int i;
 159   int &j = i;
 160 #pragma omp single private // expected-error {{expected '(' after 'private'}}
 161   foo();
 162 #pragma omp single private( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
 163   foo();
 164 #pragma omp single private() // expected-error {{expected expression}}
 165   foo();
 166 #pragma omp single private(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
 167   foo();
 168 #pragma omp single private(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
 169   foo();
 170 #pragma omp single private(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
 171   foo();
 172 #pragma omp single private(argc)
 173   foo();
 174 #pragma omp single private(S1) // expected-error {{'S1' does not refer to a value}}
 175   foo();
 176 #pragma omp single private(a, b) // expected-error {{private variable with incomplete type 'S1'}}
 177   foo();
 178 #pragma omp single private(argv[1]) // expected-error {{expected variable name}}
 179   foo();
 180 #pragma omp single private(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}}
 181   foo();
 182 #pragma omp single private(h, B::x) // expected-error 2 {{threadprivate or thread local variable cannot be private}}
 183   foo();
 184 #pragma omp single shared(i) // expected-error {{unexpected OpenMP clause 'shared' in directive '#pragma omp single'}}
 185   foo();
 186 #pragma omp parallel
 187   {
 188     int i;
 189 #pragma omp single private(i)
 190     foo();
 191   }
 192 #pragma omp parallel shared(i)
 193 #pragma omp parallel private(i)
 194 #pragma omp single private(j)
 195   foo();
 196 #pragma omp single private(i)
 197   foo();
 198   static int m;
 199 #pragma omp single private(m) // OK
 200   foo();
 201
 202   s6 = s6_0; // expected-note {{in instantiation of member function 'S6<float>::operator=' requested here}}
 203   s7 = s7_0; // expected-note {{in instantiation of member function 'S7<S6<float>>::operator=' requested here}}
 204   return foomain(argc, argv); // expected-note {{in instantiation of function template specialization 'foomain<int, char>' requested here}}
 205 }
 206