504 lines · c
1// RUN: %clang_cc1 -fsyntax-only -fopenmp -triple x86_64-unknown-unknown -fopenmp-version=45 -verify=expected,omp45 %s -Wuninitialized2// RUN: %clang_cc1 -fsyntax-only -fopenmp -triple x86_64-unknown-unknown -fopenmp-version=50 -verify=expected,omp5,omp50 %s -Wuninitialized3// RUN: %clang_cc1 -fsyntax-only -fopenmp -triple x86_64-unknown-unknown -fopenmp-version=51 -verify=expected,omp5,omp51 %s -Wuninitialized4 5// RUN: %clang_cc1 -fsyntax-only -fopenmp-simd -triple x86_64-unknown-unknown -fopenmp-version=45 -verify=expected,omp45 %s -Wuninitialized6// RUN: %clang_cc1 -fsyntax-only -fopenmp-simd -triple x86_64-unknown-unknown -fopenmp-version=50 -verify=expected,omp5,omp50 %s -Wuninitialized7// RUN: %clang_cc1 -fsyntax-only -fopenmp-simd -triple x86_64-unknown-unknown -fopenmp-version=51 -verify=expected,omp5,omp51 %s -Wuninitialized8 9void xxx(int argc) {10 int x; // expected-note {{initialize the variable 'x' to silence this warning}}11#pragma omp taskloop simd12 for (int i = 0; i < 10; ++i)13 argc = x; // expected-warning {{variable 'x' is uninitialized when used here}}14}15 16// expected-error@+1 {{unexpected OpenMP directive '#pragma omp taskloop simd'}}17#pragma omp taskloop simd18 19// expected-error@+1 {{unexpected OpenMP directive '#pragma omp taskloop simd'}}20#pragma omp taskloop simd foo21 22void test_no_clause(void) {23 int i;24#pragma omp taskloop simd25 for (i = 0; i < 16; ++i)26 ;27 28// expected-error@+2 {{statement after '#pragma omp taskloop simd' must be a for loop}}29#pragma omp taskloop simd30 ++i;31}32 33void test_branch_protected_scope(void) {34 int i = 0;35L1:36 ++i;37 38 int x[24];39 40#pragma omp parallel41#pragma omp taskloop simd42 for (i = 0; i < 16; ++i) {43 if (i == 5)44 goto L1; // expected-error {{use of undeclared label 'L1'}}45 else if (i == 6)46 return; // expected-error {{cannot return from OpenMP region}}47 else if (i == 7)48 goto L2;49 else if (i == 8) {50 L2:51 x[i]++;52 }53 }54 55 if (x[0] == 0)56 goto L2; // expected-error {{use of undeclared label 'L2'}}57 else if (x[1] == 1)58 goto L1;59}60 61void test_invalid_clause(void) {62 int i;63#pragma omp parallel64// expected-warning@+1 {{extra tokens at the end of '#pragma omp taskloop simd' are ignored}}65#pragma omp taskloop simd foo bar66 for (i = 0; i < 16; ++i)67 ;68// expected-error@+1 {{directive '#pragma omp taskloop simd' cannot contain more than one 'nogroup' clause}}69#pragma omp taskloop simd nogroup nogroup70 for (i = 0; i < 16; ++i)71 ;72}73 74void test_non_identifiers(void) {75 int i, x;76 77#pragma omp parallel78// expected-warning@+1 {{extra tokens at the end of '#pragma omp taskloop simd' are ignored}}79#pragma omp taskloop simd;80 for (i = 0; i < 16; ++i)81 ;82// expected-warning@+2 {{extra tokens at the end of '#pragma omp taskloop simd' are ignored}}83#pragma omp parallel84#pragma omp taskloop simd linear(x);85 for (i = 0; i < 16; ++i)86 ;87 88#pragma omp parallel89// expected-warning@+1 {{extra tokens at the end of '#pragma omp taskloop simd' are ignored}}90#pragma omp taskloop simd private(x);91 for (i = 0; i < 16; ++i)92 ;93 94#pragma omp parallel95// expected-warning@+1 {{extra tokens at the end of '#pragma omp taskloop simd' are ignored}}96#pragma omp taskloop simd, private(x);97 for (i = 0; i < 16; ++i)98 ;99}100 101extern int foo(void);102 103void test_collapse(void) {104 int i;105#pragma omp parallel106// expected-error@+1 {{expected '('}}107#pragma omp taskloop simd collapse108 for (i = 0; i < 16; ++i)109 ;110#pragma omp parallel111// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}112#pragma omp taskloop simd collapse(113 for (i = 0; i < 16; ++i)114 ;115#pragma omp parallel116// expected-error@+1 {{expected expression}}117#pragma omp taskloop simd collapse()118 for (i = 0; i < 16; ++i)119 ;120#pragma omp parallel121// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}122#pragma omp taskloop simd collapse(,123 for (i = 0; i < 16; ++i)124 ;125#pragma omp parallel126// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}127#pragma omp taskloop simd collapse(, )128 for (i = 0; i < 16; ++i)129 ;130#pragma omp parallel131// expected-warning@+2 {{extra tokens at the end of '#pragma omp taskloop simd' are ignored}}132// expected-error@+1 {{expected '('}}133#pragma omp taskloop simd collapse 4)134 for (i = 0; i < 16; ++i)135 ;136#pragma omp parallel137// expected-error@+2 {{expected ')'}}138// expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}}139#pragma omp taskloop simd collapse(4140 for (i = 0; i < 16; ++i)141 ; // expected-error {{expected 4 for loops after '#pragma omp taskloop simd', but found only 1}}142#pragma omp parallel143// expected-error@+2 {{expected ')'}}144// expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}}145#pragma omp taskloop simd collapse(4,146 for (i = 0; i < 16; ++i)147 ; // expected-error {{expected 4 for loops after '#pragma omp taskloop simd', but found only 1}}148#pragma omp parallel149// expected-error@+2 {{expected ')'}}150// expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}}151#pragma omp taskloop simd collapse(4, )152 for (i = 0; i < 16; ++i)153 ; // expected-error {{expected 4 for loops after '#pragma omp taskloop simd', but found only 1}}154#pragma omp parallel155// expected-note@+1 {{as specified in 'collapse' clause}}156#pragma omp taskloop simd collapse(4)157 for (i = 0; i < 16; ++i)158 ; // expected-error {{expected 4 for loops after '#pragma omp taskloop simd', but found only 1}}159#pragma omp parallel160// expected-error@+2 {{expected ')'}}161// expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}}162#pragma omp taskloop simd collapse(4 4)163 for (i = 0; i < 16; ++i)164 ; // expected-error {{expected 4 for loops after '#pragma omp taskloop simd', but found only 1}}165#pragma omp parallel166// expected-error@+2 {{expected ')'}}167// expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}}168#pragma omp taskloop simd collapse(4, , 4)169 for (i = 0; i < 16; ++i)170 ; // expected-error {{expected 4 for loops after '#pragma omp taskloop simd', but found only 1}}171#pragma omp parallel172#pragma omp taskloop simd collapse(4)173 for (int i1 = 0; i1 < 16; ++i1)174 for (int i2 = 0; i2 < 16; ++i2)175 for (int i3 = 0; i3 < 16; ++i3)176 for (int i4 = 0; i4 < 16; ++i4)177 foo();178#pragma omp parallel179// expected-error@+2 {{expected ')'}}180// expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}}181#pragma omp taskloop simd collapse(4, 8)182 for (i = 0; i < 16; ++i)183 ; // expected-error {{expected 4 for loops after '#pragma omp taskloop simd', but found only 1}}184#pragma omp parallel185// expected-error@+1 {{integer constant expression}}186#pragma omp taskloop simd collapse(2.5)187 for (i = 0; i < 16; ++i)188 ;189#pragma omp parallel190// expected-error@+1 {{integer constant expression}}191#pragma omp taskloop simd collapse(foo())192 for (i = 0; i < 16; ++i)193 ;194#pragma omp parallel195// expected-error@+1 {{argument to 'collapse' clause must be a strictly positive integer value}}196#pragma omp taskloop simd collapse(-5)197 for (i = 0; i < 16; ++i)198 ;199#pragma omp parallel200// expected-error@+1 {{argument to 'collapse' clause must be a strictly positive integer value}}201#pragma omp taskloop simd collapse(0)202 for (i = 0; i < 16; ++i)203 ;204#pragma omp parallel205// expected-error@+1 {{argument to 'collapse' clause must be a strictly positive integer value}}206#pragma omp taskloop simd collapse(5 - 5)207 for (i = 0; i < 16; ++i)208 ;209}210 211void test_private(void) {212 int i;213#pragma omp parallel214// expected-error@+2 {{expected expression}}215// expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}216#pragma omp taskloop simd private(217 for (i = 0; i < 16; ++i)218 ;219#pragma omp parallel220// expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}}221// expected-error@+1 2 {{expected expression}}222#pragma omp taskloop simd private(,223 for (i = 0; i < 16; ++i)224 ;225#pragma omp parallel226// expected-error@+1 2 {{expected expression}}227#pragma omp taskloop simd private(, )228 for (i = 0; i < 16; ++i)229 ;230#pragma omp parallel231// expected-error@+1 {{expected expression}}232#pragma omp taskloop simd private()233 for (i = 0; i < 16; ++i)234 ;235#pragma omp parallel236// expected-error@+1 {{expected expression}}237#pragma omp taskloop simd private(int)238 for (i = 0; i < 16; ++i)239 ;240#pragma omp parallel241// expected-error@+1 {{expected variable name}}242#pragma omp taskloop simd private(0)243 for (i = 0; i < 16; ++i)244 ;245 246 int x, y, z;247#pragma omp parallel248#pragma omp taskloop simd private(x)249 for (i = 0; i < 16; ++i)250 ;251#pragma omp parallel252#pragma omp taskloop simd private(x, y)253 for (i = 0; i < 16; ++i)254 ;255#pragma omp parallel256#pragma omp taskloop simd private(x, y, z)257 for (i = 0; i < 16; ++i) {258 x = y * i + z;259 }260}261 262void test_lastprivate(void) {263 int i;264#pragma omp parallel265// expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}}266// expected-error@+1 {{expected expression}}267#pragma omp taskloop simd lastprivate(268 for (i = 0; i < 16; ++i)269 ;270 271#pragma omp parallel272// expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}}273// expected-error@+1 2 {{expected expression}}274#pragma omp taskloop simd lastprivate(,275 for (i = 0; i < 16; ++i)276 ;277#pragma omp parallel278// expected-error@+1 2 {{expected expression}}279#pragma omp taskloop simd lastprivate(, )280 for (i = 0; i < 16; ++i)281 ;282#pragma omp parallel283// expected-error@+1 {{expected expression}}284#pragma omp taskloop simd lastprivate()285 for (i = 0; i < 16; ++i)286 ;287#pragma omp parallel288// expected-error@+1 {{expected expression}}289#pragma omp taskloop simd lastprivate(int)290 for (i = 0; i < 16; ++i)291 ;292#pragma omp parallel293// expected-error@+1 {{expected variable name}}294#pragma omp taskloop simd lastprivate(0)295 for (i = 0; i < 16; ++i)296 ;297 298 int x, y, z;299#pragma omp parallel300#pragma omp taskloop simd lastprivate(x)301 for (i = 0; i < 16; ++i)302 ;303#pragma omp parallel304#pragma omp taskloop simd lastprivate(x, y)305 for (i = 0; i < 16; ++i)306 ;307#pragma omp parallel308#pragma omp taskloop simd lastprivate(x, y, z)309 for (i = 0; i < 16; ++i)310 ;311}312 313void test_firstprivate(void) {314 int i;315#pragma omp parallel316// expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}}317// expected-error@+1 {{expected expression}}318#pragma omp taskloop simd firstprivate(319 for (i = 0; i < 16; ++i)320 ;321 322#pragma omp parallel323// expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}}324// expected-error@+1 2 {{expected expression}}325#pragma omp taskloop simd firstprivate(,326 for (i = 0; i < 16; ++i)327 ;328#pragma omp parallel329// expected-error@+1 2 {{expected expression}}330#pragma omp taskloop simd firstprivate(, )331 for (i = 0; i < 16; ++i)332 ;333#pragma omp parallel334// expected-error@+1 {{expected expression}}335#pragma omp taskloop simd firstprivate()336 for (i = 0; i < 16; ++i)337 ;338#pragma omp parallel339// expected-error@+1 {{expected expression}}340#pragma omp taskloop simd firstprivate(int)341 for (i = 0; i < 16; ++i)342 ;343#pragma omp parallel344// expected-error@+1 {{expected variable name}}345#pragma omp taskloop simd firstprivate(0)346 for (i = 0; i < 16; ++i)347 ;348 349 int x, y, z;350#pragma omp parallel351#pragma omp taskloop simd lastprivate(x) firstprivate(x)352 for (i = 0; i < 16; ++i)353 ;354#pragma omp parallel355#pragma omp taskloop simd lastprivate(x, y) firstprivate(x, y)356 for (i = 0; i < 16; ++i)357 ;358#pragma omp parallel359#pragma omp taskloop simd lastprivate(x, y, z) firstprivate(x, y, z)360 for (i = 0; i < 16; ++i)361 ;362// expected-error@+1 {{the value of 'simdlen' parameter must be less than or equal to the value of the 'safelen' parameter}}363#pragma omp taskloop simd simdlen(64) safelen(8)364 for (i = 0; i < 16; ++i)365 ;366}367 368void test_loop_messages(void) {369 float a[100], b[100], c[100];370#pragma omp parallel371// expected-error@+2 {{variable must be of integer or pointer type}}372#pragma omp taskloop simd373 for (float fi = 0; fi < 10.0; fi++) {374 c[(int)fi] = a[(int)fi] + b[(int)fi];375 }376#pragma omp parallel377// expected-error@+2 {{variable must be of integer or pointer type}}378#pragma omp taskloop simd379 for (double fi = 0; fi < 10.0; fi++) {380 c[(int)fi] = a[(int)fi] + b[(int)fi];381 }382 383 // expected-warning@+2 {{OpenMP loop iteration variable cannot have more than 64 bits size and will be narrowed}}384 #pragma omp taskloop simd385 for (__int128 ii = 0; ii < 10; ii++) {386 c[ii] = a[ii] + b[ii];387 }388}389 390void test_nontemporal(void) {391 int i;392// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}} expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}393#pragma omp taskloop simd nontemporal(394 for (i = 0; i < 16; ++i)395 ;396// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}} expected-error@+1 2 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}397#pragma omp taskloop simd nontemporal(,398 for (i = 0; i < 16; ++i)399 ;400// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}} expected-error@+1 2 {{expected expression}}401#pragma omp taskloop simd nontemporal(, )402 for (i = 0; i < 16; ++i)403 ;404// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}} expected-error@+1 {{expected expression}}405#pragma omp taskloop simd nontemporal()406 for (i = 0; i < 16; ++i)407 ;408// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}} expected-error@+1 {{expected expression}}409#pragma omp taskloop simd nontemporal(int)410 for (i = 0; i < 16; ++i)411 ;412// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}} omp5-error@+1 {{expected variable name}}413#pragma omp taskloop simd nontemporal(0)414 for (i = 0; i < 16; ++i)415 ;416// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}} expected-error@+1 {{use of undeclared identifier 'x'}}417#pragma omp taskloop simd nontemporal(x)418 for (i = 0; i < 16; ++i)419 ;420// expected-error@+2 {{use of undeclared identifier 'x'}}421// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}} expected-error@+1 {{use of undeclared identifier 'y'}}422#pragma omp taskloop simd nontemporal(x, y)423 for (i = 0; i < 16; ++i)424 ;425// expected-error@+3 {{use of undeclared identifier 'x'}}426// expected-error@+2 {{use of undeclared identifier 'y'}}427// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}} expected-error@+1 {{use of undeclared identifier 'z'}}428#pragma omp taskloop simd nontemporal(x, y, z)429 for (i = 0; i < 16; ++i)430 ;431 432 int x, y;433// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}} expected-error@+1 {{expected ',' or ')' in 'nontemporal' clause}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}434#pragma omp taskloop simd nontemporal(x :)435 for (i = 0; i < 16; ++i)436 ;437// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} expected-error@+1 {{expected ',' or ')' in 'nontemporal' clause}}438#pragma omp taskloop simd nontemporal(x :, )439 for (i = 0; i < 16; ++i)440 ;441 442// omp5-note@+2 {{defined as nontemporal}}443// omp45-error@+1 2 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}} omp5-error@+1 {{a variable cannot appear in more than one nontemporal clause}}444#pragma omp taskloop simd nontemporal(x) nontemporal(x)445 for (i = 0; i < 16; ++i)446 ;447 448// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}}449#pragma omp taskloop simd private(x) nontemporal(x)450 for (i = 0; i < 16; ++i)451 ;452 453// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}}454#pragma omp taskloop simd nontemporal(x) private(x)455 for (i = 0; i < 16; ++i)456 ;457 458// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}} expected-note@+1 {{to match this '('}} expected-error@+1 {{expected ',' or ')' in 'nontemporal' clause}} expected-error@+1 {{expected ')'}}459#pragma omp taskloop simd nontemporal(x, y : 0)460 for (i = 0; i < 16; ++i)461 ;462 463// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}}464#pragma omp taskloop simd nontemporal(x) lastprivate(x)465 for (i = 0; i < 16; ++i)466 ;467 468// omp45-error@+1 {{unexpected OpenMP clause 'nontemporal' in directive '#pragma omp taskloop simd'}}469#pragma omp taskloop simd lastprivate(x) nontemporal(x)470 for (i = 0; i < 16; ++i)471 ;472#pragma omp taskloop simd order // omp45-error {{unexpected OpenMP clause 'order' in directive '#pragma omp taskloop simd'}} expected-error {{expected '(' after 'order'}}473 for (int i = 0; i < 10; ++i)474 ;475#pragma omp taskloop simd order( // omp45-error {{unexpected OpenMP clause 'order' in directive '#pragma omp taskloop simd'}} expected-error {{expected ')'}} expected-note {{to match this '('}} omp5-error {{expected 'concurrent' in OpenMP clause 'order'}}476 for (int i = 0; i < 10; ++i)477 ;478#pragma omp taskloop simd order(none // omp45-error {{unexpected OpenMP clause 'order' in directive '#pragma omp taskloop simd'}} expected-error {{expected ')'}} expected-note {{to match this '('}} omp5-error {{expected 'concurrent' in OpenMP clause 'order'}}479 for (int i = 0; i < 10; ++i)480 ;481#pragma omp taskloop simd order(concurrent // omp45-error {{unexpected OpenMP clause 'order' in directive '#pragma omp taskloop simd'}} expected-error {{expected ')'}} expected-note {{to match this '('}}482 for (int i = 0; i < 10; ++i)483 ;484#pragma omp taskloop simd order(concurrent) // omp45-error {{unexpected OpenMP clause 'order' in directive '#pragma omp taskloop simd'}}485 for (int i = 0; i < 10; ++i)486 ;487#pragma omp taskloop simd order(unconstrained:) // omp45-error {{unexpected OpenMP clause 'order' in directive '#pragma omp taskloop simd'}} omp5-error {{expected 'concurrent' in OpenMP clause 'order'}}488 for (int i = 0; i < 10; ++i)489 ;490#pragma omp taskloop simd order(reproducible:concurrent // omp45-error {{unexpected OpenMP clause 'order' in directive '#pragma omp taskloop simd'}} expected-error {{expected ')'}} expected-note {{to match this '('}} omp50-error {{expected 'concurrent' in OpenMP clause 'order'}}491 for (int i = 0; i < 10; ++i)492 ;493#pragma omp taskloop simd order(reproducible:concurrent) // omp45-error {{unexpected OpenMP clause 'order' in directive '#pragma omp taskloop simd'}} omp50-error {{expected 'concurrent' in OpenMP clause 'order'}}494 for (int i = 0; i < 10; ++i)495 ;496#pragma omp taskloop simd order(unconstrained:concurrent) // omp45-error {{unexpected OpenMP clause 'order' in directive '#pragma omp taskloop simd'}} omp50-error {{expected 'concurrent' in OpenMP clause 'order'}}497 for (int i = 0; i < 10; ++i)498 ;499#pragma omp taskloop simd order(concurrent) order(concurrent) // omp45-error {{unexpected OpenMP clause 'order' in directive '#pragma omp taskloop simd'}} omp45-error {{unexpected OpenMP clause 'order' in directive '#pragma omp taskloop simd'}} omp51-error {{directive '#pragma omp taskloop simd' cannot contain more than one 'order' clause}}500 for (int i = 0; i < 10; ++i)501 ;502}503 504