c4fad65bfc
Fixes processing of declarative directives and standalone executable directives. Declarative directives should not be allowed as an immediate statements and standalone executable directives are allowed to be used in case-stmt constructs. llvm-svn: 257586
111 lines
3.0 KiB
C++
111 lines
3.0 KiB
C++
// RUN: %clang_cc1 -verify -fopenmp -ferror-limit 100 %s
|
|
|
|
template <class T>
|
|
T tmain(T argc) {
|
|
#pragma omp taskyield
|
|
;
|
|
#pragma omp taskyield untied // expected-error {{unexpected OpenMP clause 'untied' in directive '#pragma omp taskyield'}}
|
|
#pragma omp taskyield unknown // expected-warning {{extra tokens at the end of '#pragma omp taskyield' are ignored}}
|
|
if (argc)
|
|
#pragma omp taskyield // expected-error {{'#pragma omp taskyield' cannot be an immediate substatement}}
|
|
if (argc) {
|
|
#pragma omp taskyield
|
|
}
|
|
while (argc)
|
|
#pragma omp taskyield // expected-error {{'#pragma omp taskyield' cannot be an immediate substatement}}
|
|
while (argc) {
|
|
#pragma omp taskyield
|
|
}
|
|
do
|
|
#pragma omp taskyield // expected-error {{'#pragma omp taskyield' cannot be an immediate substatement}}
|
|
while (argc)
|
|
;
|
|
do {
|
|
#pragma omp taskyield
|
|
} while (argc);
|
|
switch (argc)
|
|
#pragma omp taskyield // expected-error {{'#pragma omp taskyield' cannot be an immediate substatement}}
|
|
switch (argc)
|
|
case 1:
|
|
#pragma omp taskyield
|
|
switch (argc)
|
|
case 1: {
|
|
#pragma omp taskyield
|
|
}
|
|
switch (argc) {
|
|
#pragma omp taskyield
|
|
case 1:
|
|
#pragma omp taskyield
|
|
break;
|
|
default: {
|
|
#pragma omp taskyield
|
|
} break;
|
|
}
|
|
for (;;)
|
|
#pragma omp taskyield // expected-error {{'#pragma omp taskyield' cannot be an immediate substatement}}
|
|
for (;;) {
|
|
#pragma omp taskyield
|
|
}
|
|
label:
|
|
#pragma omp taskyield // expected-error {{'#pragma omp taskyield' cannot be an immediate substatement}}
|
|
label1 : {
|
|
#pragma omp taskyield
|
|
}
|
|
|
|
return T();
|
|
}
|
|
|
|
int main(int argc, char **argv) {
|
|
#pragma omp taskyield
|
|
;
|
|
#pragma omp taskyield untied // expected-error {{unexpected OpenMP clause 'untied' in directive '#pragma omp taskyield'}}
|
|
#pragma omp taskyield unknown // expected-warning {{extra tokens at the end of '#pragma omp taskyield' are ignored}}
|
|
if (argc)
|
|
#pragma omp taskyield // expected-error {{'#pragma omp taskyield' cannot be an immediate substatement}}
|
|
if (argc) {
|
|
#pragma omp taskyield
|
|
}
|
|
while (argc)
|
|
#pragma omp taskyield // expected-error {{'#pragma omp taskyield' cannot be an immediate substatement}}
|
|
while (argc) {
|
|
#pragma omp taskyield
|
|
}
|
|
do
|
|
#pragma omp taskyield // expected-error {{'#pragma omp taskyield' cannot be an immediate substatement}}
|
|
while (argc)
|
|
;
|
|
do {
|
|
#pragma omp taskyield
|
|
} while (argc);
|
|
switch (argc)
|
|
#pragma omp taskyield // expected-error {{'#pragma omp taskyield' cannot be an immediate substatement}}
|
|
switch (argc)
|
|
case 1:
|
|
#pragma omp taskyield
|
|
switch (argc)
|
|
case 1: {
|
|
#pragma omp taskyield
|
|
}
|
|
switch (argc) {
|
|
#pragma omp taskyield
|
|
case 1:
|
|
#pragma omp taskyield
|
|
break;
|
|
default: {
|
|
#pragma omp taskyield
|
|
} break;
|
|
}
|
|
for (;;)
|
|
#pragma omp taskyield // expected-error {{'#pragma omp taskyield' cannot be an immediate substatement}}
|
|
for (;;) {
|
|
#pragma omp taskyield
|
|
}
|
|
label:
|
|
#pragma omp taskyield // expected-error {{'#pragma omp taskyield' cannot be an immediate substatement}}
|
|
label1 : {
|
|
#pragma omp taskyield
|
|
}
|
|
|
|
return tmain(argc);
|
|
}
|