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 2 {{declared here}} expected-note 2 {{forward declaration of 'S1'}}
11 extern S1 a;
12 class S2 {
13   mutable int a;
14 
15 public:
16   S2() : a(0) {}
17 };
18 const S2 b;
19 const S2 ba[5];
20 class S3 {
21   int a;
22 
23 public:
24   S3() : a(0) {}
25 };
26 const S3 ca[5];
27 class S4 {
28   int a;
29   S4(); // expected-note {{implicitly declared private here}}
30 
31 public:
32   S4(int v) : a(v) {
33 #pragma omp target
34 #pragma omp teams
35 #pragma omp distribute parallel for simd private(a) private(this->a)
36     for (int k = 0; k < v; ++k)
37       ++this->a;
38   }
39 };
40 class S5 {
41   int a;
42   S5() : a(0) {} // expected-note {{implicitly declared private here}}
43 
44 public:
45   S5(int v) : a(v) {}
46   S5 &operator=(S5 &s) {
47 #pragma omp target
48 #pragma omp teams
49 #pragma omp distribute parallel for simd private(a) private(this->a) private(s.a) // expected-error {{expected variable name or data member of current class}}
50     for (int k = 0; k < s.a; ++k)
51       ++s.a;
52     return *this;
53   }
54 };
55 
56 template <typename T>
57 class S6 {
58 public:
59   T a;
60 
61   S6() : a(0) {}
62   S6(T v) : a(v) {
63 #pragma omp target
64 #pragma omp teams
65 #pragma omp distribute parallel for simd private(a) private(this->a)
66     for (int k = 0; k < v; ++k)
67       ++this->a;
68   }
69   S6 &operator=(S6 &s) {
70 #pragma omp target
71 #pragma omp teams
72 #pragma omp distribute parallel for simd private(a) private(this->a) private(s.a) // expected-error {{expected variable name or data member of current class}}
73     for (int k = 0; k < s.a; ++k)
74       ++s.a;
75     return *this;
76   }
77 };
78 
79 template <typename T>
80 class S7 : public T {
81   T a;
82   S7() : a(0) {}
83 
84 public:
85   S7(T v) : a(v) {
86 #pragma omp target
87 #pragma omp teams
88 #pragma omp distribute parallel for simd private(a) private(this->a) private(T::a)
89     for (int k = 0; k < a.a; ++k)
90       ++this->a.a;
91   }
92   S7 &operator=(S7 &s) {
93 #pragma omp target
94 #pragma omp teams
95 #pragma omp distribute parallel for simd private(a) private(this->a) private(s.a) private(s.T::a) // expected-error 2 {{expected variable name or data member of current class}}
96     for (int k = 0; k < s.a.a; ++k)
97       ++s.a.a;
98     return *this;
99   }
100 };
101 
102 S3 h;
103 #pragma omp threadprivate(h) // expected-note 2 {{defined as threadprivate or thread local}}
104 
105 template <class I, class C>
106 int foomain(I argc, C **argv) {
107   I e(4);
108   I g(5);
109   int i;
110   int &j = i;
111 #pragma omp target
112 #pragma omp teams
113 #pragma omp distribute parallel for simd private // expected-error {{expected '(' after 'private'}}
114   for (int k = 0; k < argc; ++k)
115     ++k;
116 #pragma omp target
117 #pragma omp teams
118 #pragma omp distribute parallel for simd private( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
119   for (int k = 0; k < argc; ++k)
120     ++k;
121 #pragma omp target
122 #pragma omp teams
123 #pragma omp distribute parallel for simd private() // expected-error {{expected expression}}
124   for (int k = 0; k < argc; ++k)
125     ++k;
126 #pragma omp target
127 #pragma omp teams
128 #pragma omp distribute parallel for simd private(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
129   for (int k = 0; k < argc; ++k)
130     ++k;
131 #pragma omp target
132 #pragma omp teams
133 #pragma omp distribute parallel for simd private(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
134   for (int k = 0; k < argc; ++k)
135     ++k;
136 #pragma omp target
137 #pragma omp teams
138 #pragma omp distribute parallel for simd private(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
139   for (int k = 0; k < argc; ++k)
140     ++k;
141 #pragma omp target
142 #pragma omp teams
143 #pragma omp distribute parallel for simd private(argc)
144   for (int k = 0; k < argc; ++k)
145     ++k;
146 #pragma omp target
147 #pragma omp teams
148 #pragma omp distribute parallel for simd private(S1) // expected-error {{'S1' does not refer to a value}}
149   for (int k = 0; k < argc; ++k)
150     ++k;
151 #pragma omp target
152 #pragma omp teams
153 #pragma omp distribute parallel for simd private(a, b) // expected-error {{private variable with incomplete type 'S1'}}
154   for (int k = 0; k < argc; ++k)
155     ++k;
156 #pragma omp target
157 #pragma omp teams
158 #pragma omp distribute parallel for simd private(argv[1]) // expected-error {{expected variable name}}
159   for (int k = 0; k < argc; ++k)
160     ++k;
161 #pragma omp target
162 #pragma omp teams
163 #pragma omp distribute parallel for simd private(e, g)
164   for (int k = 0; k < argc; ++k)
165     ++k;
166 #pragma omp target
167 #pragma omp teams
168 #pragma omp distribute parallel for simd private(h) // expected-error {{threadprivate or thread local variable cannot be private}}
169   for (int k = 0; k < argc; ++k)
170     ++k;
171 #pragma omp target
172 #pragma omp teams
173 #pragma omp distribute parallel for simd nowait // expected-error {{unexpected OpenMP clause 'nowait' in directive '#pragma omp distribute parallel for simd'}}
174   for (int k = 0; k < argc; ++k)
175     ++k;
176 #pragma omp parallel
177   {
178     int v = 0;
179     int i;
180 #pragma omp target
181 #pragma omp teams
182 #pragma omp distribute parallel for simd private(i)
183     for (int k = 0; k < argc; ++k) {
184       i = k;
185       v += i;
186     }
187   }
188 #pragma omp parallel shared(i)
189 #pragma omp parallel private(i)
190 #pragma omp target
191 #pragma omp teams
192 #pragma omp distribute parallel for simd private(j)
193   for (int k = 0; k < argc; ++k)
194     ++k;
195 #pragma omp target
196 #pragma omp teams
197 #pragma omp distribute parallel for simd private(i)
198   for (int k = 0; k < argc; ++k)
199     ++k;
200   return 0;
201 }
202 
203 namespace A {
204 double x;
205 #pragma omp threadprivate(x) // expected-note {{defined as threadprivate or thread local}}
206 }
207 namespace B {
208 using A::x;
209 }
210 
211 int main(int argc, char **argv) {
212   S4 e(4);
213   S5 g(5);
214   S6<float> s6(0.0) , s6_0(1.0);
215   S7<S6<float> > s7(0.0) , s7_0(1.0);
216   int i;
217   int &j = i;
218 #pragma omp target
219 #pragma omp teams
220 #pragma omp distribute parallel for simd private // expected-error {{expected '(' after 'private'}}
221   for (int k = 0; k < argc; ++k)
222     ++k;
223 #pragma omp target
224 #pragma omp teams
225 #pragma omp distribute parallel for simd private( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
226   for (int k = 0; k < argc; ++k)
227     ++k;
228 #pragma omp target
229 #pragma omp teams
230 #pragma omp distribute parallel for simd private() // expected-error {{expected expression}}
231   for (int k = 0; k < argc; ++k)
232     ++k;
233 #pragma omp target
234 #pragma omp teams
235 #pragma omp distribute parallel for simd private(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
236   for (int k = 0; k < argc; ++k)
237     ++k;
238 #pragma omp target
239 #pragma omp teams
240 #pragma omp distribute parallel for simd private(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
241   for (int k = 0; k < argc; ++k)
242     ++k;
243 #pragma omp target
244 #pragma omp teams
245 #pragma omp distribute parallel for simd private(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
246   for (int k = 0; k < argc; ++k)
247     ++k;
248 #pragma omp target
249 #pragma omp teams
250 #pragma omp distribute parallel for simd private(argc)
251   for (int k = 0; k < argc; ++k)
252     ++k;
253 #pragma omp target
254 #pragma omp teams
255 #pragma omp distribute parallel for simd private(S1) // expected-error {{'S1' does not refer to a value}}
256   for (int k = 0; k < argc; ++k)
257     ++k;
258 #pragma omp target
259 #pragma omp teams
260 #pragma omp distribute parallel for simd private(a, b) // expected-error {{private variable with incomplete type 'S1'}}
261   for (int k = 0; k < argc; ++k)
262     ++k;
263 #pragma omp target
264 #pragma omp teams
265 #pragma omp distribute parallel for simd private(argv[1]) // expected-error {{expected variable name}}
266   for (int k = 0; k < argc; ++k)
267     ++k;
268 #pragma omp target
269 #pragma omp teams
270 #pragma omp distribute parallel for simd private(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}}
271   for (int k = 0; k < argc; ++k)
272     ++k;
273 #pragma omp target
274 #pragma omp teams
275 #pragma omp distribute parallel for simd private(h, B::x) // expected-error 2 {{threadprivate or thread local variable cannot be private}}
276   for (int k = 0; k < argc; ++k)
277     ++k;
278 #pragma omp target
279 #pragma omp teams
280 #pragma omp distribute parallel for simd nowait // expected-error {{unexpected OpenMP clause 'nowait' in directive '#pragma omp distribute parallel for simd'}}
281   for (int k = 0; k < argc; ++k)
282     ++k;
283 #pragma omp parallel
284   {
285     int i;
286 #pragma omp target
287 #pragma omp teams
288 #pragma omp distribute parallel for simd private(i)
289     for (int k = 0; k < argc; ++k)
290       ++k;
291   }
292 #pragma omp parallel shared(i)
293 #pragma omp parallel private(i)
294 #pragma omp target
295 #pragma omp teams
296 #pragma omp distribute parallel for simd private(j)
297   for (int k = 0; k < argc; ++k)
298     ++k;
299 #pragma omp target
300 #pragma omp teams
301 #pragma omp distribute parallel for simd private(i)
302   for (int k = 0; k < argc; ++k)
303     ++k;
304   static int m;
305 #pragma omp target
306 #pragma omp teams
307 #pragma omp distribute parallel for simd private(m)
308   for (int k = 0; k < argc; ++k)
309     m = k + 2;
310 
311   s6 = s6_0; // expected-note {{in instantiation of member function 'S6<float>::operator=' requested here}}
312   s7 = s7_0; // expected-note {{in instantiation of member function 'S7<S6<float> >::operator=' requested here}}
313   return foomain(argc, argv); // expected-note {{in instantiation of function template specialization 'foomain<int, char>' requested here}}
314 }
315 
316