test/OpenMP/taskloop_loop_messages.cpp

   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