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