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