test/OpenMP/parallel_for_loop_messages.cpp

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