1 | // RUN: %clang_cc1 -fsyntax-only -fopenmp -x c++ -std=c++11 -fexceptions -fcxx-exceptions -verify %s |
2 | |
3 | // RUN: %clang_cc1 -fsyntax-only -fopenmp-simd -x c++ -std=c++11 -fexceptions -fcxx-exceptions -verify %s |
4 | |
5 | class S { |
6 | int a; |
7 | S() : a(0) {} |
8 | |
9 | public: |
10 | S(int v) : a(v) {} |
11 | S(const S &s) : a(s.a) {} |
12 | }; |
13 | |
14 | static int sii; |
15 | // expected-note@+1 {{defined as threadprivate or thread local}} |
16 | #pragma omp threadprivate(sii) |
17 | static int globalii; |
18 | |
19 | // Currently, we cannot use "0" for global register variables. |
20 | // register int reg0 __asm__("0"); |
21 | int reg0; |
22 | |
23 | int test_iteration_spaces() { |
24 | const int N = 100; |
25 | float a[N], b[N], c[N]; |
26 | int ii, jj, kk; |
27 | float fii; |
28 | double dii; |
29 | register int reg; // expected-warning {{'register' storage class specifier is deprecated}} |
30 | #pragma omp parallel |
31 | #pragma omp taskloop |
32 | for (int i = 0; i < 10; i += 1) { |
33 | c[i] = a[i] + b[i]; |
34 | } |
35 | #pragma omp parallel |
36 | #pragma omp taskloop |
37 | for (char i = 0; i < 10; i++) { |
38 | c[i] = a[i] + b[i]; |
39 | } |
40 | #pragma omp parallel |
41 | #pragma omp taskloop |
42 | for (char i = 0; i < 10; i += '\1') { |
43 | c[i] = a[i] + b[i]; |
44 | } |
45 | #pragma omp parallel |
46 | #pragma omp taskloop |
47 | for (long long i = 0; i < 10; i++) { |
48 | c[i] = a[i] + b[i]; |
49 | } |
50 | #pragma omp parallel |
51 | // expected-error@+2 {{expression must have integral or unscoped enumeration type, not 'double'}} |
52 | #pragma omp taskloop |
53 | for (long long i = 0; i < 10; i += 1.5) { |
54 | c[i] = a[i] + b[i]; |
55 | } |
56 | #pragma omp parallel |
57 | #pragma omp taskloop |
58 | for (long long i = 0; i < 'z'; i += 1u) { |
59 | c[i] = a[i] + b[i]; |
60 | } |
61 | #pragma omp parallel |
62 | // expected-error@+2 {{variable must be of integer or random access iterator type}} |
63 | #pragma omp taskloop |
64 | for (float fi = 0; fi < 10.0; fi++) { |
65 | c[(int)fi] = a[(int)fi] + b[(int)fi]; |
66 | } |
67 | #pragma omp parallel |
68 | // expected-error@+2 {{variable must be of integer or random access iterator type}} |
69 | #pragma omp taskloop |
70 | for (double fi = 0; fi < 10.0; fi++) { |
71 | c[(int)fi] = a[(int)fi] + b[(int)fi]; |
72 | } |
73 | #pragma omp parallel |
74 | // expected-error@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
75 | #pragma omp taskloop |
76 | for (int &ref = ii; ref < 10; ref++) { |
77 | } |
78 | #pragma omp parallel |
79 | // expected-error@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
80 | #pragma omp taskloop |
81 | for (int i; i < 10; i++) |
82 | c[i] = a[i]; |
83 | |
84 | #pragma omp parallel |
85 | // expected-error@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
86 | #pragma omp taskloop |
87 | for (int i = 0, j = 0; i < 10; ++i) |
88 | c[i] = a[i]; |
89 | |
90 | #pragma omp parallel |
91 | // expected-error@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
92 | #pragma omp taskloop |
93 | for (; ii < 10; ++ii) |
94 | c[ii] = a[ii]; |
95 | |
96 | #pragma omp parallel |
97 | // expected-warning@+3 {{expression result unused}} |
98 | // expected-error@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
99 | #pragma omp taskloop |
100 | for (ii + 1; ii < 10; ++ii) |
101 | c[ii] = a[ii]; |
102 | |
103 | #pragma omp parallel |
104 | // expected-error@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
105 | #pragma omp taskloop |
106 | for (c[ii] = 0; ii < 10; ++ii) |
107 | c[ii] = a[ii]; |
108 | |
109 | #pragma omp parallel |
110 | // Ok to skip parenthesises. |
111 | #pragma omp taskloop |
112 | for (((ii)) = 0; ii < 10; ++ii) |
113 | c[ii] = a[ii]; |
114 | |
115 | #pragma omp parallel |
116 | // expected-error@+2 {{condition of OpenMP for loop must be a relational comparison ('<', '<=', '>', or '>=') of loop variable 'i'}} |
117 | #pragma omp taskloop |
118 | for (int i = 0; i; i++) |
119 | c[i] = a[i]; |
120 | |
121 | #pragma omp parallel |
122 | // expected-error@+3 {{condition of OpenMP for loop must be a relational comparison ('<', '<=', '>', or '>=') of loop variable 'i'}} |
123 | // expected-error@+2 {{increment clause of OpenMP for loop must perform simple addition or subtraction on loop variable 'i'}} |
124 | #pragma omp taskloop |
125 | for (int i = 0; jj < kk; ii++) |
126 | c[i] = a[i]; |
127 | |
128 | #pragma omp parallel |
129 | // expected-error@+2 {{condition of OpenMP for loop must be a relational comparison ('<', '<=', '>', or '>=') of loop variable 'i'}} |
130 | #pragma omp taskloop |
131 | for (int i = 0; !!i; i++) |
132 | c[i] = a[i]; |
133 | |
134 | // Ok |
135 | #pragma omp parallel |
136 | #pragma omp taskloop |
137 | for (int i = 0; i != 1; i++) |
138 | c[i] = a[i]; |
139 | |
140 | #pragma omp parallel |
141 | // expected-error@+2 {{condition of OpenMP for loop must be a relational comparison ('<', '<=', '>', or '>=') of loop variable 'i'}} |
142 | #pragma omp taskloop |
143 | for (int i = 0;; i++) |
144 | c[i] = a[i]; |
145 | |
146 | #pragma omp parallel |
147 | // Ok. |
148 | #pragma omp taskloop |
149 | for (int i = 11; i > 10; i--) |
150 | c[i] = a[i]; |
151 | |
152 | #pragma omp parallel |
153 | // Ok. |
154 | #pragma omp taskloop |
155 | for (int i = 0; i < 10; ++i) |
156 | c[i] = a[i]; |
157 | |
158 | #pragma omp parallel |
159 | // Ok. |
160 | #pragma omp taskloop |
161 | for (ii = 0; ii < 10; ++ii) |
162 | c[ii] = a[ii]; |
163 | |
164 | #pragma omp parallel |
165 | // expected-error@+2 {{increment clause of OpenMP for loop must perform simple addition or subtraction on loop variable 'ii'}} |
166 | #pragma omp taskloop |
167 | for (ii = 0; ii < 10; ++jj) |
168 | c[ii] = a[jj]; |
169 | |
170 | #pragma omp parallel |
171 | // expected-error@+2 {{increment clause of OpenMP for loop must perform simple addition or subtraction on loop variable 'ii'}} |
172 | #pragma omp taskloop |
173 | for (ii = 0; ii < 10; ++++ii) |
174 | c[ii] = a[ii]; |
175 | |
176 | #pragma omp parallel |
177 | // Ok but undefined behavior (in general, cannot check that incr |
178 | // is really loop-invariant). |
179 | #pragma omp taskloop |
180 | for (ii = 0; ii < 10; ii = ii + ii) |
181 | c[ii] = a[ii]; |
182 | |
183 | #pragma omp parallel |
184 | // expected-error@+2 {{expression must have integral or unscoped enumeration type, not 'float'}} |
185 | #pragma omp taskloop |
186 | for (ii = 0; ii < 10; ii = ii + 1.0f) |
187 | c[ii] = a[ii]; |
188 | |
189 | #pragma omp parallel |
190 | // Ok - step was converted to integer type. |
191 | #pragma omp taskloop |
192 | for (ii = 0; ii < 10; ii = ii + (int)1.1f) |
193 | c[ii] = a[ii]; |
194 | |
195 | #pragma omp parallel |
196 | // expected-error@+2 {{increment clause of OpenMP for loop must perform simple addition or subtraction on loop variable 'ii'}} |
197 | #pragma omp taskloop |
198 | for (ii = 0; ii < 10; jj = ii + 2) |
199 | c[ii] = a[ii]; |
200 | |
201 | #pragma omp parallel |
202 | // expected-warning@+3 {{relational comparison result unused}} |
203 | // expected-error@+2 {{increment clause of OpenMP for loop must perform simple addition or subtraction on loop variable 'ii'}} |
204 | #pragma omp taskloop |
205 | for (ii = 0; ii<10; jj> kk + 2) |
206 | c[ii] = a[ii]; |
207 | |
208 | #pragma omp parallel |
209 | // expected-error@+2 {{increment clause of OpenMP for loop must perform simple addition or subtraction on loop variable 'ii'}} |
210 | #pragma omp taskloop |
211 | for (ii = 0; ii < 10;) |
212 | c[ii] = a[ii]; |
213 | |
214 | #pragma omp parallel |
215 | // expected-warning@+3 {{expression result unused}} |
216 | // expected-error@+2 {{increment clause of OpenMP for loop must perform simple addition or subtraction on loop variable 'ii'}} |
217 | #pragma omp taskloop |
218 | for (ii = 0; ii < 10; !ii) |
219 | c[ii] = a[ii]; |
220 | |
221 | #pragma omp parallel |
222 | // expected-error@+2 {{increment clause of OpenMP for loop must perform simple addition or subtraction on loop variable 'ii'}} |
223 | #pragma omp taskloop |
224 | for (ii = 0; ii < 10; ii ? ++ii : ++jj) |
225 | c[ii] = a[ii]; |
226 | |
227 | #pragma omp parallel |
228 | // expected-error@+2 {{increment clause of OpenMP for loop must perform simple addition or subtraction on loop variable 'ii'}} |
229 | #pragma omp taskloop |
230 | for (ii = 0; ii < 10; ii = ii < 10) |
231 | c[ii] = a[ii]; |
232 | |
233 | #pragma omp parallel |
234 | // expected-note@+3 {{loop step is expected to be positive due to this condition}} |
235 | // expected-error@+2 {{increment expression must cause 'ii' to increase on each iteration of OpenMP for loop}} |
236 | #pragma omp taskloop |
237 | for (ii = 0; ii < 10; ii = ii + 0) |
238 | c[ii] = a[ii]; |
239 | |
240 | #pragma omp parallel |
241 | // expected-note@+3 {{loop step is expected to be positive due to this condition}} |
242 | // expected-error@+2 {{increment expression must cause 'ii' to increase on each iteration of OpenMP for loop}} |
243 | #pragma omp taskloop |
244 | for (ii = 0; ii < 10; ii = ii + (int)(0.8 - 0.45)) |
245 | c[ii] = a[ii]; |
246 | |
247 | #pragma omp parallel |
248 | // expected-note@+3 {{loop step is expected to be positive due to this condition}} |
249 | // expected-error@+2 {{increment expression must cause 'ii' to increase on each iteration of OpenMP for loop}} |
250 | #pragma omp taskloop |
251 | for (ii = 0; (ii) < 10; ii -= 25) |
252 | c[ii] = a[ii]; |
253 | |
254 | #pragma omp parallel |
255 | // expected-note@+3 {{loop step is expected to be positive due to this condition}} |
256 | // expected-error@+2 {{increment expression must cause 'ii' to increase on each iteration of OpenMP for loop}} |
257 | #pragma omp taskloop |
258 | for (ii = 0; (ii < 10); ii -= 0) |
259 | c[ii] = a[ii]; |
260 | |
261 | #pragma omp parallel |
262 | // expected-note@+3 {{loop step is expected to be negative due to this condition}} |
263 | // expected-error@+2 {{increment expression must cause 'ii' to decrease on each iteration of OpenMP for loop}} |
264 | #pragma omp taskloop |
265 | for (ii = 0; ii > 10; (ii += 0)) |
266 | c[ii] = a[ii]; |
267 | |
268 | #pragma omp parallel |
269 | // expected-note@+3 {{loop step is expected to be positive due to this condition}} |
270 | // expected-error@+2 {{increment expression must cause 'ii' to increase on each iteration of OpenMP for loop}} |
271 | #pragma omp taskloop |
272 | for (ii = 0; ii < 10; (ii) = (1 - 1) + (ii)) |
273 | c[ii] = a[ii]; |
274 | |
275 | #pragma omp parallel |
276 | // expected-note@+3 {{loop step is expected to be negative due to this condition}} |
277 | // expected-error@+2 {{increment expression must cause 'ii' to decrease on each iteration of OpenMP for loop}} |
278 | #pragma omp taskloop |
279 | for ((ii = 0); ii > 10; (ii -= 0)) |
280 | c[ii] = a[ii]; |
281 | |
282 | #pragma omp parallel |
283 | // expected-note@+3 {{loop step is expected to be positive due to this condition}} |
284 | // expected-error@+2 {{increment expression must cause 'ii' to increase on each iteration of OpenMP for loop}} |
285 | #pragma omp taskloop |
286 | for (ii = 0; (ii < 10); (ii -= 0)) |
287 | c[ii] = a[ii]; |
288 | |
289 | #pragma omp parallel |
290 | // expected-note@+2 {{defined as firstprivate}} |
291 | // expected-error@+2 {{loop iteration variable in the associated loop of 'omp taskloop' directive may not be firstprivate, predetermined as private}} |
292 | #pragma omp taskloop firstprivate(ii) |
293 | for (ii = 0; ii < 10; ii++) |
294 | c[ii] = a[ii]; |
295 | |
296 | #pragma omp parallel |
297 | // expected-error@+1 {{unexpected OpenMP clause 'linear' in directive '#pragma omp taskloop'}} |
298 | #pragma omp taskloop linear(ii) |
299 | for (ii = 0; ii < 10; ii++) |
300 | c[ii] = a[ii]; |
301 | |
302 | #pragma omp parallel |
303 | #pragma omp taskloop private(ii) |
304 | for (ii = 0; ii < 10; ii++) |
305 | c[ii] = a[ii]; |
306 | |
307 | #pragma omp parallel |
308 | #pragma omp taskloop lastprivate(ii) |
309 | for (ii = 0; ii < 10; ii++) |
310 | c[ii] = a[ii]; |
311 | |
312 | #pragma omp parallel |
313 | { |
314 | // expected-error@+2 {{loop iteration variable in the associated loop of 'omp taskloop' directive may not be threadprivate or thread local, predetermined as private}} |
315 | #pragma omp taskloop |
316 | for (sii = 0; sii < 10; sii += 1) |
317 | c[sii] = a[sii]; |
318 | } |
319 | |
320 | #pragma omp parallel |
321 | { |
322 | #pragma omp taskloop |
323 | for (reg0 = 0; reg0 < 10; reg0 += 1) |
324 | c[reg0] = a[reg0]; |
325 | } |
326 | |
327 | #pragma omp parallel |
328 | { |
329 | #pragma omp taskloop |
330 | for (reg = 0; reg < 10; reg += 1) |
331 | c[reg] = a[reg]; |
332 | } |
333 | |
334 | #pragma omp parallel |
335 | { |
336 | #pragma omp taskloop |
337 | for (globalii = 0; globalii < 10; globalii += 1) |
338 | c[globalii] = a[globalii]; |
339 | } |
340 | |
341 | #pragma omp parallel |
342 | { |
343 | #pragma omp taskloop collapse(2) |
344 | for (ii = 0; ii < 10; ii += 1) |
345 | for (globalii = 0; globalii < 10; globalii += 1) |
346 | c[globalii] += a[globalii] + ii; |
347 | } |
348 | |
349 | #pragma omp parallel |
350 | // expected-error@+2 {{statement after '#pragma omp taskloop' must be a for loop}} |
351 | #pragma omp taskloop |
352 | for (auto &item : a) { |
353 | item = item + 1; |
354 | } |
355 | |
356 | #pragma omp parallel |
357 | // expected-note@+3 {{loop step is expected to be positive due to this condition}} |
358 | // expected-error@+2 {{increment expression must cause 'i' to increase on each iteration of OpenMP for loop}} |
359 | #pragma omp taskloop |
360 | for (unsigned i = 9; i < 10; i--) { |
361 | c[i] = a[i] + b[i]; |
362 | } |
363 | |
364 | int(*lb)[4] = nullptr; |
365 | #pragma omp parallel |
366 | #pragma omp taskloop |
367 | for (int(*p)[4] = lb; p < lb + 8; ++p) { |
368 | } |
369 | |
370 | #pragma omp parallel |
371 | // expected-warning@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
372 | #pragma omp taskloop |
373 | for (int a{0}; a < 10; ++a) { |
374 | } |
375 | |
376 | return 0; |
377 | } |
378 | |
379 | // Iterators allowed in openmp for-loops. |
380 | namespace std { |
381 | struct random_access_iterator_tag {}; |
382 | template <class Iter> |
383 | struct iterator_traits { |
384 | typedef typename Iter::difference_type difference_type; |
385 | typedef typename Iter::iterator_category iterator_category; |
386 | }; |
387 | template <class Iter> |
388 | typename iterator_traits<Iter>::difference_type |
389 | distance(Iter first, Iter last) { return first - last; } |
390 | } |
391 | class Iter0 { |
392 | public: |
393 | Iter0() {} |
394 | Iter0(const Iter0 &) {} |
395 | Iter0 operator++() { return *this; } |
396 | Iter0 operator--() { return *this; } |
397 | bool operator<(Iter0 a) { return true; } |
398 | }; |
399 | // expected-note@+2 {{candidate function not viable: no known conversion from 'GoodIter' to 'Iter0' for 1st argument}} |
400 | // expected-note@+1 2 {{candidate function not viable: no known conversion from 'Iter1' to 'Iter0' for 1st argument}} |
401 | int operator-(Iter0 a, Iter0 b) { return 0; } |
402 | class Iter1 { |
403 | public: |
404 | Iter1(float f = 0.0f, double d = 0.0) {} |
405 | Iter1(const Iter1 &) {} |
406 | Iter1 operator++() { return *this; } |
407 | Iter1 operator--() { return *this; } |
408 | bool operator<(Iter1 a) { return true; } |
409 | bool operator>=(Iter1 a) { return false; } |
410 | }; |
411 | class GoodIter { |
412 | public: |
413 | GoodIter() {} |
414 | GoodIter(const GoodIter &) {} |
415 | GoodIter(int fst, int snd) {} |
416 | GoodIter &operator=(const GoodIter &that) { return *this; } |
417 | GoodIter &operator=(const Iter0 &that) { return *this; } |
418 | GoodIter &operator+=(int x) { return *this; } |
419 | GoodIter &operator-=(int x) { return *this; } |
420 | explicit GoodIter(void *) {} |
421 | GoodIter operator++() { return *this; } |
422 | GoodIter operator--() { return *this; } |
423 | bool operator!() { return true; } |
424 | bool operator<(GoodIter a) { return true; } |
425 | bool operator<=(GoodIter a) { return true; } |
426 | bool operator>=(GoodIter a) { return false; } |
427 | typedef int difference_type; |
428 | typedef std::random_access_iterator_tag iterator_category; |
429 | }; |
430 | // expected-note@+2 {{candidate function not viable: no known conversion from 'const Iter0' to 'GoodIter' for 2nd argument}} |
431 | // expected-note@+1 2 {{candidate function not viable: no known conversion from 'Iter1' to 'GoodIter' for 1st argument}} |
432 | int operator-(GoodIter a, GoodIter b) { return 0; } |
433 | // expected-note@+1 3 {{candidate function not viable: requires single argument 'a', but 2 arguments were provided}} |
434 | GoodIter operator-(GoodIter a) { return a; } |
435 | // expected-note@+2 {{candidate function not viable: no known conversion from 'const Iter0' to 'int' for 2nd argument}} |
436 | // expected-note@+1 2 {{candidate function not viable: no known conversion from 'Iter1' to 'GoodIter' for 1st argument}} |
437 | GoodIter operator-(GoodIter a, int v) { return GoodIter(); } |
438 | // expected-note@+1 2 {{candidate function not viable: no known conversion from 'Iter0' to 'GoodIter' for 1st argument}} |
439 | GoodIter operator+(GoodIter a, int v) { return GoodIter(); } |
440 | // expected-note@+2 {{candidate function not viable: no known conversion from 'GoodIter' to 'int' for 1st argument}} |
441 | // expected-note@+1 2 {{candidate function not viable: no known conversion from 'Iter1' to 'int' for 1st argument}} |
442 | GoodIter operator-(int v, GoodIter a) { return GoodIter(); } |
443 | // expected-note@+1 2 {{candidate function not viable: no known conversion from 'Iter0' to 'int' for 1st argument}} |
444 | GoodIter operator+(int v, GoodIter a) { return GoodIter(); } |
445 | |
446 | int test_with_random_access_iterator() { |
447 | GoodIter begin, end; |
448 | Iter0 begin0, end0; |
449 | #pragma omp parallel |
450 | #pragma omp taskloop |
451 | for (GoodIter I = begin; I < end; ++I) |
452 | ++I; |
453 | #pragma omp parallel |
454 | // expected-error@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
455 | #pragma omp taskloop |
456 | for (GoodIter &I = begin; I < end; ++I) |
457 | ++I; |
458 | #pragma omp parallel |
459 | #pragma omp taskloop |
460 | for (GoodIter I = begin; I >= end; --I) |
461 | ++I; |
462 | #pragma omp parallel |
463 | // expected-warning@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
464 | #pragma omp taskloop |
465 | for (GoodIter I(begin); I < end; ++I) |
466 | ++I; |
467 | #pragma omp parallel |
468 | // expected-warning@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
469 | #pragma omp taskloop |
470 | for (GoodIter I(nullptr); I < end; ++I) |
471 | ++I; |
472 | #pragma omp parallel |
473 | // expected-warning@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
474 | #pragma omp taskloop |
475 | for (GoodIter I(0); I < end; ++I) |
476 | ++I; |
477 | #pragma omp parallel |
478 | // expected-warning@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
479 | #pragma omp taskloop |
480 | for (GoodIter I(1, 2); I < end; ++I) |
481 | ++I; |
482 | #pragma omp parallel |
483 | #pragma omp taskloop |
484 | for (begin = GoodIter(0); begin < end; ++begin) |
485 | ++begin; |
486 | // expected-error@+4 {{invalid operands to binary expression ('GoodIter' and 'const Iter0')}} |
487 | // expected-error@+3 {{could not calculate number of iterations calling 'operator-' with upper and lower loop bounds}} |
488 | #pragma omp parallel |
489 | #pragma omp taskloop |
490 | for (begin = begin0; begin < end; ++begin) |
491 | ++begin; |
492 | #pragma omp parallel |
493 | // expected-error@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
494 | #pragma omp taskloop |
495 | for (++begin; begin < end; ++begin) |
496 | ++begin; |
497 | #pragma omp parallel |
498 | #pragma omp taskloop |
499 | for (begin = end; begin < end; ++begin) |
500 | ++begin; |
501 | #pragma omp parallel |
502 | // expected-error@+2 {{condition of OpenMP for loop must be a relational comparison ('<', '<=', '>', or '>=') of loop variable 'I'}} |
503 | #pragma omp taskloop |
504 | for (GoodIter I = begin; I - I; ++I) |
505 | ++I; |
506 | #pragma omp parallel |
507 | // expected-error@+2 {{condition of OpenMP for loop must be a relational comparison ('<', '<=', '>', or '>=') of loop variable 'I'}} |
508 | #pragma omp taskloop |
509 | for (GoodIter I = begin; begin < end; ++I) |
510 | ++I; |
511 | #pragma omp parallel |
512 | // expected-error@+2 {{condition of OpenMP for loop must be a relational comparison ('<', '<=', '>', or '>=') of loop variable 'I'}} |
513 | #pragma omp taskloop |
514 | for (GoodIter I = begin; !I; ++I) |
515 | ++I; |
516 | #pragma omp parallel |
517 | // expected-note@+3 {{loop step is expected to be negative due to this condition}} |
518 | // expected-error@+2 {{increment expression must cause 'I' to decrease on each iteration of OpenMP for loop}} |
519 | #pragma omp taskloop |
520 | for (GoodIter I = begin; I >= end; I = I + 1) |
521 | ++I; |
522 | #pragma omp parallel |
523 | #pragma omp taskloop |
524 | for (GoodIter I = begin; I >= end; I = I - 1) |
525 | ++I; |
526 | #pragma omp parallel |
527 | // expected-error@+2 {{increment clause of OpenMP for loop must perform simple addition or subtraction on loop variable 'I'}} |
528 | #pragma omp taskloop |
529 | for (GoodIter I = begin; I >= end; I = -I) |
530 | ++I; |
531 | #pragma omp parallel |
532 | // expected-note@+3 {{loop step is expected to be negative due to this condition}} |
533 | // expected-error@+2 {{increment expression must cause 'I' to decrease on each iteration of OpenMP for loop}} |
534 | #pragma omp taskloop |
535 | for (GoodIter I = begin; I >= end; I = 2 + I) |
536 | ++I; |
537 | #pragma omp parallel |
538 | // expected-error@+2 {{increment clause of OpenMP for loop must perform simple addition or subtraction on loop variable 'I'}} |
539 | #pragma omp taskloop |
540 | for (GoodIter I = begin; I >= end; I = 2 - I) |
541 | ++I; |
542 | // In the following example, we cannot update the loop variable using '+=' |
543 | // expected-error@+3 {{invalid operands to binary expression ('Iter0' and 'int')}} |
544 | #pragma omp parallel |
545 | #pragma omp taskloop |
546 | for (Iter0 I = begin0; I < end0; ++I) |
547 | ++I; |
548 | #pragma omp parallel |
549 | // Initializer is constructor without params. |
550 | // expected-error@+3 {{invalid operands to binary expression ('Iter0' and 'int')}} |
551 | // expected-warning@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
552 | #pragma omp taskloop |
553 | for (Iter0 I; I < end0; ++I) |
554 | ++I; |
555 | Iter1 begin1, end1; |
556 | // expected-error@+4 {{invalid operands to binary expression ('Iter1' and 'Iter1')}} |
557 | // expected-error@+3 {{could not calculate number of iterations calling 'operator-' with upper and lower loop bounds}} |
558 | #pragma omp parallel |
559 | #pragma omp taskloop |
560 | for (Iter1 I = begin1; I < end1; ++I) |
561 | ++I; |
562 | #pragma omp parallel |
563 | // expected-note@+3 {{loop step is expected to be negative due to this condition}} |
564 | // expected-error@+2 {{increment expression must cause 'I' to decrease on each iteration of OpenMP for loop}} |
565 | #pragma omp taskloop |
566 | for (Iter1 I = begin1; I >= end1; ++I) |
567 | ++I; |
568 | #pragma omp parallel |
569 | // expected-error@+5 {{invalid operands to binary expression ('Iter1' and 'float')}} |
570 | // expected-error@+4 {{could not calculate number of iterations calling 'operator-' with upper and lower loop bounds}} |
571 | // Initializer is constructor with all default params. |
572 | // expected-warning@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}} |
573 | #pragma omp taskloop |
574 | for (Iter1 I; I < end1; ++I) { |
575 | } |
576 | return 0; |
577 | } |
578 | |
579 | template <typename IT, int ST> |
580 | class TC { |
581 | public: |
582 | int dotest_lt(IT begin, IT end) { |
583 | #pragma omp parallel |
584 | // expected-note@+3 {{loop step is expected to be positive due to this condition}} |
585 | // expected-error@+2 {{increment expression must cause 'I' to increase on each iteration of OpenMP for loop}} |
586 | #pragma omp taskloop |
587 | for (IT I = begin; I < end; I = I + ST) { |
588 | ++I; |
589 | } |
590 | #pragma omp parallel |
591 | // expected-note@+3 {{loop step is expected to be positive due to this condition}} |
592 | // expected-error@+2 {{increment expression must cause 'I' to increase on each iteration of OpenMP for loop}} |
593 | #pragma omp taskloop |
594 | for (IT I = begin; I <= end; I += ST) { |
595 | ++I; |
596 | } |
597 | #pragma omp parallel |
598 | #pragma omp taskloop |
599 | for (IT I = begin; I < end; ++I) { |
600 | ++I; |
601 | } |
602 | } |
603 | |
604 | static IT step() { |
605 | return IT(ST); |
606 | } |
607 | }; |
608 | template <typename IT, int ST = 0> |
609 | int dotest_gt(IT begin, IT end) { |
610 | #pragma omp parallel |
611 | // expected-note@+3 2 {{loop step is expected to be negative due to this condition}} |
612 | // expected-error@+2 2 {{increment expression must cause 'I' to decrease on each iteration of OpenMP for loop}} |
613 | #pragma omp taskloop |
614 | for (IT I = begin; I >= end; I = I + ST) { |
615 | ++I; |
616 | } |
617 | #pragma omp parallel |
618 | // expected-note@+3 2 {{loop step is expected to be negative due to this condition}} |
619 | // expected-error@+2 2 {{increment expression must cause 'I' to decrease on each iteration of OpenMP for loop}} |
620 | #pragma omp taskloop |
621 | for (IT I = begin; I >= end; I += ST) { |
622 | ++I; |
623 | } |
624 | |
625 | #pragma omp parallel |
626 | // expected-note@+3 {{loop step is expected to be negative due to this condition}} |
627 | // expected-error@+2 {{increment expression must cause 'I' to decrease on each iteration of OpenMP for loop}} |
628 | #pragma omp taskloop |
629 | for (IT I = begin; I >= end; ++I) { |
630 | ++I; |
631 | } |
632 | |
633 | #pragma omp parallel |
634 | #pragma omp taskloop |
635 | for (IT I = begin; I < end; I += TC<int, ST>::step()) { |
636 | ++I; |
637 | } |
638 | } |
639 | |
640 | void test_with_template() { |
641 | GoodIter begin, end; |
642 | TC<GoodIter, 100> t1; |
643 | TC<GoodIter, -100> t2; |
644 | t1.dotest_lt(begin, end); |
645 | t2.dotest_lt(begin, end); // expected-note {{in instantiation of member function 'TC<GoodIter, -100>::dotest_lt' requested here}} |
646 | dotest_gt(begin, end); // expected-note {{in instantiation of function template specialization 'dotest_gt<GoodIter, 0>' requested here}} |
647 | dotest_gt<unsigned, 10>(0, 100); // expected-note {{in instantiation of function template specialization 'dotest_gt<unsigned int, 10>' requested here}} |
648 | } |
649 | |
650 | void test_loop_break() { |
651 | const int N = 100; |
652 | float a[N], b[N], c[N]; |
653 | #pragma omp parallel |
654 | #pragma omp taskloop |
655 | for (int i = 0; i < 10; i++) { |
656 | c[i] = a[i] + b[i]; |
657 | for (int j = 0; j < 10; ++j) { |
658 | if (a[i] > b[j]) |
659 | break; // OK in nested loop |
660 | } |
661 | switch (i) { |
662 | case 1: |
663 | b[i]++; |
664 | break; |
665 | default: |
666 | break; |
667 | } |
668 | if (c[i] > 10) |
669 | break; // expected-error {{'break' statement cannot be used in OpenMP for loop}} |
670 | |
671 | if (c[i] > 11) |
672 | break; // expected-error {{'break' statement cannot be used in OpenMP for loop}} |
673 | } |
674 | |
675 | #pragma omp parallel |
676 | #pragma omp taskloop |
677 | for (int i = 0; i < 10; i++) { |
678 | for (int j = 0; j < 10; j++) { |
679 | c[i] = a[i] + b[i]; |
680 | if (c[i] > 10) { |
681 | if (c[i] < 20) { |
682 | break; // OK |
683 | } |
684 | } |
685 | } |
686 | } |
687 | } |
688 | |
689 | void test_loop_eh() { |
690 | const int N = 100; |
691 | float a[N], b[N], c[N]; |
692 | #pragma omp parallel |
693 | #pragma omp taskloop |
694 | for (int i = 0; i < 10; i++) { |
695 | c[i] = a[i] + b[i]; |
696 | try { |
697 | for (int j = 0; j < 10; ++j) { |
698 | if (a[i] > b[j]) |
699 | throw a[i]; |
700 | } |
701 | throw a[i]; |
702 | } catch (float f) { |
703 | if (f > 0.1) |
704 | throw a[i]; |
705 | return; // expected-error {{cannot return from OpenMP region}} |
706 | } |
707 | switch (i) { |
708 | case 1: |
709 | b[i]++; |
710 | break; |
711 | default: |
712 | break; |
713 | } |
714 | for (int j = 0; j < 10; j++) { |
715 | if (c[i] > 10) |
716 | throw c[i]; |
717 | } |
718 | } |
719 | if (c[9] > 10) |
720 | throw c[9]; // OK |
721 | |
722 | #pragma omp parallel |
723 | #pragma omp taskloop |
724 | for (int i = 0; i < 10; ++i) { |
725 | struct S { |
726 | void g() { throw 0; } |
727 | }; |
728 | } |
729 | } |
730 | |
731 | void test_loop_firstprivate_lastprivate() { |
732 | S s(4); |
733 | #pragma omp parallel |
734 | #pragma omp taskloop lastprivate(s) firstprivate(s) |
735 | for (int i = 0; i < 16; ++i) |
736 | ; |
737 | } |
738 | |
739 | |