2017-04-20 08:39:39 +08:00
|
|
|
// RUN: %clang_cc1 -verify -fopenmp -ferror-limit 100 -std=c++11 -o - %s
|
|
|
|
|
2017-12-30 02:07:07 +08:00
|
|
|
// RUN: %clang_cc1 -verify -fopenmp-simd -ferror-limit 100 -std=c++11 -o - %s
|
|
|
|
|
2017-04-20 08:39:39 +08:00
|
|
|
void foo() {
|
|
|
|
}
|
|
|
|
|
|
|
|
#pragma omp distribute parallel for // expected-error {{unexpected OpenMP directive '#pragma omp distribute parallel for'}}
|
|
|
|
|
|
|
|
int main(int argc, char **argv) {
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for { // expected-warning {{extra tokens at the end of '#pragma omp distribute parallel for' are ignored}}
|
|
|
|
for (int i = 0; i < argc; ++i)
|
|
|
|
foo();
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for ( // expected-warning {{extra tokens at the end of '#pragma omp distribute parallel for' are ignored}}
|
|
|
|
for (int i = 0; i < argc; ++i)
|
|
|
|
foo();
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for[ // expected-warning {{extra tokens at the end of '#pragma omp distribute parallel for' are ignored}}
|
|
|
|
for (int i = 0; i < argc; ++i)
|
|
|
|
foo();
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for] // expected-warning {{extra tokens at the end of '#pragma omp distribute parallel for' are ignored}}
|
|
|
|
for (int i = 0; i < argc; ++i)
|
|
|
|
foo();
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for) // expected-warning {{extra tokens at the end of '#pragma omp distribute parallel for' are ignored}}
|
|
|
|
for (int i = 0; i < argc; ++i)
|
|
|
|
foo();
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for } // expected-warning {{extra tokens at the end of '#pragma omp distribute parallel for' are ignored}}
|
|
|
|
for (int i = 0; i < argc; ++i)
|
|
|
|
foo();
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
2017-11-30 02:20:04 +08:00
|
|
|
#pragma omp distribute parallel for linear(argc) // expected-error {{unexpected OpenMP clause 'linear' in directive '#pragma omp distribute parallel for'}}
|
2017-04-20 08:39:39 +08:00
|
|
|
for (int i = 0; i < argc; ++i)
|
|
|
|
foo();
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for unknown() // expected-warning {{extra tokens at the end of '#pragma omp distribute parallel for' are ignored}}
|
|
|
|
for (int i = 0; i < argc; ++i)
|
|
|
|
foo();
|
|
|
|
L1:
|
|
|
|
for (int i = 0; i < argc; ++i)
|
|
|
|
foo();
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for
|
|
|
|
for (int i = 0; i < argc; ++i)
|
|
|
|
foo();
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for
|
|
|
|
for (int i = 0; i < argc; ++i) {
|
|
|
|
goto L1; // expected-error {{use of undeclared label 'L1'}}
|
|
|
|
argc++;
|
|
|
|
}
|
|
|
|
|
|
|
|
for (int i = 0; i < 10; ++i) {
|
|
|
|
switch (argc) {
|
|
|
|
case (0):
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for
|
|
|
|
for (int i = 0; i < argc; ++i) {
|
|
|
|
foo();
|
|
|
|
break; // expected-error {{'break' statement cannot be used in OpenMP for loop}}
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
default:
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for default(none)
|
|
|
|
for (int i = 0; i < 10; ++i)
|
|
|
|
++argc; // expected-error {{variable 'argc' must have explicitly specified data sharing attributes}}
|
|
|
|
|
|
|
|
goto L2; // expected-error {{use of undeclared label 'L2'}}
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for
|
|
|
|
for (int i = 0; i < argc; ++i)
|
|
|
|
L2:
|
|
|
|
foo();
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for
|
|
|
|
for (int i = 0; i < argc; ++i) {
|
|
|
|
return 1; // expected-error {{cannot return from OpenMP region}}
|
|
|
|
}
|
|
|
|
|
|
|
|
[[]] // expected-error {{an attribute list cannot appear here}}
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for
|
|
|
|
for (int n = 0; n < 100; ++n) {
|
|
|
|
}
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
void test_ordered() {
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for collapse(2) collapse(3) // expected-error {{directive '#pragma omp distribute parallel for' cannot contain more than one 'collapse' clause}}
|
|
|
|
for (int i = 0; i < 16; ++i)
|
|
|
|
for (int j = 0; j < 16; ++j)
|
|
|
|
;
|
|
|
|
}
|
|
|
|
|
2017-11-23 04:19:50 +08:00
|
|
|
void test_cancel() {
|
|
|
|
#pragma omp target
|
|
|
|
#pragma omp teams
|
|
|
|
#pragma omp distribute parallel for
|
|
|
|
for (int i = 0; i < 16; ++i)
|
|
|
|
for (int j = 0; j < 16; ++j) {
|
|
|
|
#pragma omp cancel for
|
|
|
|
;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|