xref: /llvm-project/clang/test/OpenMP/taskloop_loop_messages.cpp (revision a8a9153a372afcfe2d18399b079bfdc5fd4da626)
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 #pragma omp parallel
135 // expected-error@+2 {{condition of OpenMP for loop must be a relational comparison ('<', '<=', '>', or '>=') of loop variable 'i'}}
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@+2 {{unexpected OpenMP clause 'linear' in directive '#pragma omp taskloop'}}
298 // expected-note@+1 {{defined as linear}}
299 #pragma omp taskloop linear(ii)
300 // expected-error@+1 {{loop iteration variable in the associated loop of 'omp taskloop' directive may not be linear, predetermined as private}}
301   for (ii = 0; ii < 10; ii++)
302     c[ii] = a[ii];
303 
304 #pragma omp parallel
305 #pragma omp taskloop private(ii)
306   for (ii = 0; ii < 10; ii++)
307     c[ii] = a[ii];
308 
309 #pragma omp parallel
310 #pragma omp taskloop lastprivate(ii)
311   for (ii = 0; ii < 10; ii++)
312     c[ii] = a[ii];
313 
314 #pragma omp parallel
315   {
316 // expected-error@+2 {{loop iteration variable in the associated loop of 'omp taskloop' directive may not be threadprivate or thread local, predetermined as private}}
317 #pragma omp taskloop
318     for (sii = 0; sii < 10; sii += 1)
319       c[sii] = a[sii];
320   }
321 
322 #pragma omp parallel
323   {
324 #pragma omp taskloop
325     for (reg0 = 0; reg0 < 10; reg0 += 1)
326       c[reg0] = a[reg0];
327   }
328 
329 #pragma omp parallel
330   {
331 #pragma omp taskloop
332     for (reg = 0; reg < 10; reg += 1)
333       c[reg] = a[reg];
334   }
335 
336 #pragma omp parallel
337   {
338 #pragma omp taskloop
339     for (globalii = 0; globalii < 10; globalii += 1)
340       c[globalii] = a[globalii];
341   }
342 
343 #pragma omp parallel
344   {
345 #pragma omp taskloop collapse(2)
346     for (ii = 0; ii < 10; ii += 1)
347     for (globalii = 0; globalii < 10; globalii += 1)
348       c[globalii] += a[globalii] + ii;
349   }
350 
351 #pragma omp parallel
352 // expected-error@+2 {{statement after '#pragma omp taskloop' must be a for loop}}
353 #pragma omp taskloop
354   for (auto &item : a) {
355     item = item + 1;
356   }
357 
358 #pragma omp parallel
359 // expected-note@+3 {{loop step is expected to be positive due to this condition}}
360 // expected-error@+2 {{increment expression must cause 'i' to increase on each iteration of OpenMP for loop}}
361 #pragma omp taskloop
362   for (unsigned i = 9; i < 10; i--) {
363     c[i] = a[i] + b[i];
364   }
365 
366   int(*lb)[4] = nullptr;
367 #pragma omp parallel
368 #pragma omp taskloop
369   for (int(*p)[4] = lb; p < lb + 8; ++p) {
370   }
371 
372 #pragma omp parallel
373 // expected-warning@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}}
374 #pragma omp taskloop
375   for (int a{0}; a < 10; ++a) {
376   }
377 
378   return 0;
379 }
380 
381 // Iterators allowed in openmp for-loops.
382 namespace std {
383 struct random_access_iterator_tag {};
384 template <class Iter>
385 struct iterator_traits {
386   typedef typename Iter::difference_type difference_type;
387   typedef typename Iter::iterator_category iterator_category;
388 };
389 template <class Iter>
390 typename iterator_traits<Iter>::difference_type
391 distance(Iter first, Iter last) { return first - last; }
392 }
393 class Iter0 {
394 public:
395   Iter0() {}
396   Iter0(const Iter0 &) {}
397   Iter0 operator++() { return *this; }
398   Iter0 operator--() { return *this; }
399   bool operator<(Iter0 a) { return true; }
400 };
401 // expected-note@+2 {{candidate function not viable: no known conversion from 'GoodIter' to 'Iter0' for 1st argument}}
402 // expected-note@+1 2 {{candidate function not viable: no known conversion from 'Iter1' to 'Iter0' for 1st argument}}
403 int operator-(Iter0 a, Iter0 b) { return 0; }
404 class Iter1 {
405 public:
406   Iter1(float f = 0.0f, double d = 0.0) {}
407   Iter1(const Iter1 &) {}
408   Iter1 operator++() { return *this; }
409   Iter1 operator--() { return *this; }
410   bool operator<(Iter1 a) { return true; }
411   bool operator>=(Iter1 a) { return false; }
412 };
413 class GoodIter {
414 public:
415   GoodIter() {}
416   GoodIter(const GoodIter &) {}
417   GoodIter(int fst, int snd) {}
418   GoodIter &operator=(const GoodIter &that) { return *this; }
419   GoodIter &operator=(const Iter0 &that) { return *this; }
420   GoodIter &operator+=(int x) { return *this; }
421   GoodIter &operator-=(int x) { return *this; }
422   explicit GoodIter(void *) {}
423   GoodIter operator++() { return *this; }
424   GoodIter operator--() { return *this; }
425   bool operator!() { return true; }
426   bool operator<(GoodIter a) { return true; }
427   bool operator<=(GoodIter a) { return true; }
428   bool operator>=(GoodIter a) { return false; }
429   typedef int difference_type;
430   typedef std::random_access_iterator_tag iterator_category;
431 };
432 // expected-note@+2 {{candidate function not viable: no known conversion from 'const Iter0' to 'GoodIter' for 2nd argument}}
433 // expected-note@+1 2 {{candidate function not viable: no known conversion from 'Iter1' to 'GoodIter' for 1st argument}}
434 int operator-(GoodIter a, GoodIter b) { return 0; }
435 // expected-note@+1 3 {{candidate function not viable: requires single argument 'a', but 2 arguments were provided}}
436 GoodIter operator-(GoodIter a) { return a; }
437 // expected-note@+2 {{candidate function not viable: no known conversion from 'const Iter0' to 'int' for 2nd argument}}
438 // expected-note@+1 2 {{candidate function not viable: no known conversion from 'Iter1' to 'GoodIter' for 1st argument}}
439 GoodIter operator-(GoodIter a, int v) { return GoodIter(); }
440 // expected-note@+1 2 {{candidate function not viable: no known conversion from 'Iter0' to 'GoodIter' for 1st argument}}
441 GoodIter operator+(GoodIter a, int v) { return GoodIter(); }
442 // expected-note@+2 {{candidate function not viable: no known conversion from 'GoodIter' to 'int' for 1st argument}}
443 // expected-note@+1 2 {{candidate function not viable: no known conversion from 'Iter1' to 'int' for 1st argument}}
444 GoodIter operator-(int v, GoodIter a) { return GoodIter(); }
445 // expected-note@+1 2 {{candidate function not viable: no known conversion from 'Iter0' to 'int' for 1st argument}}
446 GoodIter operator+(int v, GoodIter a) { return GoodIter(); }
447 
448 int test_with_random_access_iterator() {
449   GoodIter begin, end;
450   Iter0 begin0, end0;
451 #pragma omp parallel
452 #pragma omp taskloop
453   for (GoodIter I = begin; I < end; ++I)
454     ++I;
455 #pragma omp parallel
456 // expected-error@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}}
457 #pragma omp taskloop
458   for (GoodIter &I = begin; I < end; ++I)
459     ++I;
460 #pragma omp parallel
461 #pragma omp taskloop
462   for (GoodIter I = begin; I >= end; --I)
463     ++I;
464 #pragma omp parallel
465 // expected-warning@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}}
466 #pragma omp taskloop
467   for (GoodIter I(begin); I < end; ++I)
468     ++I;
469 #pragma omp parallel
470 // expected-warning@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}}
471 #pragma omp taskloop
472   for (GoodIter I(nullptr); I < end; ++I)
473     ++I;
474 #pragma omp parallel
475 // expected-warning@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}}
476 #pragma omp taskloop
477   for (GoodIter I(0); I < end; ++I)
478     ++I;
479 #pragma omp parallel
480 // expected-warning@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}}
481 #pragma omp taskloop
482   for (GoodIter I(1, 2); I < end; ++I)
483     ++I;
484 #pragma omp parallel
485 #pragma omp taskloop
486   for (begin = GoodIter(0); begin < end; ++begin)
487     ++begin;
488 // expected-error@+4 {{invalid operands to binary expression ('GoodIter' and 'const Iter0')}}
489 // expected-error@+3 {{could not calculate number of iterations calling 'operator-' with upper and lower loop bounds}}
490 #pragma omp parallel
491 #pragma omp taskloop
492   for (begin = begin0; begin < end; ++begin)
493     ++begin;
494 #pragma omp parallel
495 // expected-error@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}}
496 #pragma omp taskloop
497   for (++begin; begin < end; ++begin)
498     ++begin;
499 #pragma omp parallel
500 #pragma omp taskloop
501   for (begin = end; begin < end; ++begin)
502     ++begin;
503 #pragma omp parallel
504 // expected-error@+2 {{condition of OpenMP for loop must be a relational comparison ('<', '<=', '>', or '>=') of loop variable 'I'}}
505 #pragma omp taskloop
506   for (GoodIter I = begin; I - I; ++I)
507     ++I;
508 #pragma omp parallel
509 // expected-error@+2 {{condition of OpenMP for loop must be a relational comparison ('<', '<=', '>', or '>=') of loop variable 'I'}}
510 #pragma omp taskloop
511   for (GoodIter I = begin; begin < end; ++I)
512     ++I;
513 #pragma omp parallel
514 // expected-error@+2 {{condition of OpenMP for loop must be a relational comparison ('<', '<=', '>', or '>=') of loop variable 'I'}}
515 #pragma omp taskloop
516   for (GoodIter I = begin; !I; ++I)
517     ++I;
518 #pragma omp parallel
519 // expected-note@+3 {{loop step is expected to be negative due to this condition}}
520 // expected-error@+2 {{increment expression must cause 'I' to decrease on each iteration of OpenMP for loop}}
521 #pragma omp taskloop
522   for (GoodIter I = begin; I >= end; I = I + 1)
523     ++I;
524 #pragma omp parallel
525 #pragma omp taskloop
526   for (GoodIter I = begin; I >= end; I = I - 1)
527     ++I;
528 #pragma omp parallel
529 // expected-error@+2 {{increment clause of OpenMP for loop must perform simple addition or subtraction on loop variable 'I'}}
530 #pragma omp taskloop
531   for (GoodIter I = begin; I >= end; I = -I)
532     ++I;
533 #pragma omp parallel
534 // expected-note@+3 {{loop step is expected to be negative due to this condition}}
535 // expected-error@+2 {{increment expression must cause 'I' to decrease on each iteration of OpenMP for loop}}
536 #pragma omp taskloop
537   for (GoodIter I = begin; I >= end; I = 2 + I)
538     ++I;
539 #pragma omp parallel
540 // expected-error@+2 {{increment clause of OpenMP for loop must perform simple addition or subtraction on loop variable 'I'}}
541 #pragma omp taskloop
542   for (GoodIter I = begin; I >= end; I = 2 - I)
543     ++I;
544 // In the following example, we cannot update the loop variable using '+='
545 // expected-error@+3 {{invalid operands to binary expression ('Iter0' and 'int')}}
546 #pragma omp parallel
547 #pragma omp taskloop
548   for (Iter0 I = begin0; I < end0; ++I)
549     ++I;
550 #pragma omp parallel
551 // Initializer is constructor without params.
552 // expected-error@+3 {{invalid operands to binary expression ('Iter0' and 'int')}}
553 // expected-warning@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}}
554 #pragma omp taskloop
555   for (Iter0 I; I < end0; ++I)
556     ++I;
557   Iter1 begin1, end1;
558 // expected-error@+4 {{invalid operands to binary expression ('Iter1' and 'Iter1')}}
559 // expected-error@+3 {{could not calculate number of iterations calling 'operator-' with upper and lower loop bounds}}
560 #pragma omp parallel
561 #pragma omp taskloop
562   for (Iter1 I = begin1; I < end1; ++I)
563     ++I;
564 #pragma omp parallel
565 // expected-note@+3 {{loop step is expected to be negative due to this condition}}
566 // expected-error@+2 {{increment expression must cause 'I' to decrease on each iteration of OpenMP for loop}}
567 #pragma omp taskloop
568   for (Iter1 I = begin1; I >= end1; ++I)
569     ++I;
570 #pragma omp parallel
571 // expected-error@+5 {{invalid operands to binary expression ('Iter1' and 'float')}}
572 // expected-error@+4 {{could not calculate number of iterations calling 'operator-' with upper and lower loop bounds}}
573 // Initializer is constructor with all default params.
574 // expected-warning@+2 {{initialization clause of OpenMP for loop is not in canonical form ('var = init' or 'T var = init')}}
575 #pragma omp taskloop
576   for (Iter1 I; I < end1; ++I) {
577   }
578   return 0;
579 }
580 
581 template <typename IT, int ST>
582 class TC {
583 public:
584   int dotest_lt(IT begin, IT end) {
585 #pragma omp parallel
586 // expected-note@+3 {{loop step is expected to be positive due to this condition}}
587 // expected-error@+2 {{increment expression must cause 'I' to increase on each iteration of OpenMP for loop}}
588 #pragma omp taskloop
589     for (IT I = begin; I < end; I = I + ST) {
590       ++I;
591     }
592 #pragma omp parallel
593 // expected-note@+3 {{loop step is expected to be positive due to this condition}}
594 // expected-error@+2 {{increment expression must cause 'I' to increase on each iteration of OpenMP for loop}}
595 #pragma omp taskloop
596     for (IT I = begin; I <= end; I += ST) {
597       ++I;
598     }
599 #pragma omp parallel
600 #pragma omp taskloop
601     for (IT I = begin; I < end; ++I) {
602       ++I;
603     }
604   }
605 
606   static IT step() {
607     return IT(ST);
608   }
609 };
610 template <typename IT, int ST = 0>
611 int dotest_gt(IT begin, IT end) {
612 #pragma omp parallel
613 // expected-note@+3 2 {{loop step is expected to be negative due to this condition}}
614 // expected-error@+2 2 {{increment expression must cause 'I' to decrease on each iteration of OpenMP for loop}}
615 #pragma omp taskloop
616   for (IT I = begin; I >= end; I = I + ST) {
617     ++I;
618   }
619 #pragma omp parallel
620 // expected-note@+3 2 {{loop step is expected to be negative due to this condition}}
621 // expected-error@+2 2 {{increment expression must cause 'I' to decrease on each iteration of OpenMP for loop}}
622 #pragma omp taskloop
623   for (IT I = begin; I >= end; I += ST) {
624     ++I;
625   }
626 
627 #pragma omp parallel
628 // expected-note@+3 {{loop step is expected to be negative due to this condition}}
629 // expected-error@+2 {{increment expression must cause 'I' to decrease on each iteration of OpenMP for loop}}
630 #pragma omp taskloop
631   for (IT I = begin; I >= end; ++I) {
632     ++I;
633   }
634 
635 #pragma omp parallel
636 #pragma omp taskloop
637   for (IT I = begin; I < end; I += TC<int, ST>::step()) {
638     ++I;
639   }
640 }
641 
642 void test_with_template() {
643   GoodIter begin, end;
644   TC<GoodIter, 100> t1;
645   TC<GoodIter, -100> t2;
646   t1.dotest_lt(begin, end);
647   t2.dotest_lt(begin, end);         // expected-note {{in instantiation of member function 'TC<GoodIter, -100>::dotest_lt' requested here}}
648   dotest_gt(begin, end);            // expected-note {{in instantiation of function template specialization 'dotest_gt<GoodIter, 0>' requested here}}
649   dotest_gt<unsigned, 10>(0, 100);  // expected-note {{in instantiation of function template specialization 'dotest_gt<unsigned int, 10>' requested here}}
650 }
651 
652 void test_loop_break() {
653   const int N = 100;
654   float a[N], b[N], c[N];
655 #pragma omp parallel
656 #pragma omp taskloop
657   for (int i = 0; i < 10; i++) {
658     c[i] = a[i] + b[i];
659     for (int j = 0; j < 10; ++j) {
660       if (a[i] > b[j])
661         break; // OK in nested loop
662     }
663     switch (i) {
664     case 1:
665       b[i]++;
666       break;
667     default:
668       break;
669     }
670     if (c[i] > 10)
671       break; // expected-error {{'break' statement cannot be used in OpenMP for loop}}
672 
673     if (c[i] > 11)
674       break; // expected-error {{'break' statement cannot be used in OpenMP for loop}}
675   }
676 
677 #pragma omp parallel
678 #pragma omp taskloop
679   for (int i = 0; i < 10; i++) {
680     for (int j = 0; j < 10; j++) {
681       c[i] = a[i] + b[i];
682       if (c[i] > 10) {
683         if (c[i] < 20) {
684           break; // OK
685         }
686       }
687     }
688   }
689 }
690 
691 void test_loop_eh() {
692   const int N = 100;
693   float a[N], b[N], c[N];
694 #pragma omp parallel
695 #pragma omp taskloop
696   for (int i = 0; i < 10; i++) {
697     c[i] = a[i] + b[i];
698     try {
699       for (int j = 0; j < 10; ++j) {
700         if (a[i] > b[j])
701           throw a[i];
702       }
703       throw a[i];
704     } catch (float f) {
705       if (f > 0.1)
706         throw a[i];
707       return; // expected-error {{cannot return from OpenMP region}}
708     }
709     switch (i) {
710     case 1:
711       b[i]++;
712       break;
713     default:
714       break;
715     }
716     for (int j = 0; j < 10; j++) {
717       if (c[i] > 10)
718         throw c[i];
719     }
720   }
721   if (c[9] > 10)
722     throw c[9]; // OK
723 
724 #pragma omp parallel
725 #pragma omp taskloop
726   for (int i = 0; i < 10; ++i) {
727     struct S {
728       void g() { throw 0; }
729     };
730   }
731 }
732 
733 void test_loop_firstprivate_lastprivate() {
734   S s(4);
735 #pragma omp parallel
736 #pragma omp taskloop lastprivate(s) firstprivate(s)
737   for (int i = 0; i < 16; ++i)
738     ;
739 }
740 
741