clang/test/OpenMP/target_parallel_for_loop_messages.cpp

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