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