forked from OSchip/llvm-project
152 lines
7.6 KiB
C++
152 lines
7.6 KiB
C++
// RUN: %clang_cc1 -verify -fopenmp -fopenmp-version=50 -ferror-limit 100 %s -Wuninitialized
|
|
|
|
// RUN: %clang_cc1 -verify -fopenmp-simd -fopenmp-version=50 -ferror-limit 100 %s -Wuninitialized
|
|
|
|
struct S1 { // expected-note 2 {{declared here}}
|
|
int a;
|
|
} s;
|
|
|
|
#pragma omp depobj(0) depend(in:s) // expected-error {{unexpected OpenMP directive '#pragma omp depobj'}}
|
|
void foo() {
|
|
#pragma omp depobj(0) depend(in:s) // expected-error {{'omp_depend_t' type not found; include <omp.h>}} expected-error {{expected lvalue expression}}}
|
|
}
|
|
|
|
typedef void *omp_depend_t;
|
|
|
|
template <class T>
|
|
T tmain(T argc) {
|
|
omp_depend_t x;
|
|
#pragma omp depobj() allocate(argc) // expected-error {{expected expression}} expected-error {{expected depobj expression}} expected-error {{unexpected OpenMP clause 'allocate' in directive '#pragma omp depobj'}}
|
|
;
|
|
#pragma omp depobj(x) untied // expected-error {{unexpected OpenMP clause 'untied' in directive '#pragma omp depobj'}}
|
|
#pragma omp depobj(x) unknown // expected-warning {{extra tokens at the end of '#pragma omp depobj' are ignored}}
|
|
if (argc)
|
|
#pragma omp depobj(x) depend(in:s) // expected-error {{'#pragma omp depobj' cannot be an immediate substatement}}
|
|
if (argc) {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
}
|
|
while (argc)
|
|
#pragma omp depobj(x) depend(in:s) // expected-error {{'#pragma omp depobj' cannot be an immediate substatement}}
|
|
while (argc) {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
}
|
|
do
|
|
#pragma omp depobj(x) depend(in:s) // expected-error {{'#pragma omp depobj' cannot be an immediate substatement}}
|
|
while (argc)
|
|
;
|
|
do {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
} while (argc);
|
|
switch (argc)
|
|
#pragma omp depobj(x) depend(in:s) // expected-error {{'#pragma omp depobj' cannot be an immediate substatement}}
|
|
switch (argc)
|
|
case 1:
|
|
#pragma omp depobj(x) depend(in:s) // expected-error {{'#pragma omp depobj' cannot be an immediate substatement}}
|
|
switch (argc)
|
|
case 1: {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
}
|
|
switch (argc) {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
case 1:
|
|
#pragma omp depobj(x) depend(in:s)
|
|
break;
|
|
default: {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
} break;
|
|
}
|
|
for (;;)
|
|
#pragma omp depobj(x) depend(in:s) // expected-error {{'#pragma omp depobj' cannot be an immediate substatement}}
|
|
for (;;) {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
}
|
|
label:
|
|
#pragma omp depobj(x) depend(in:s)
|
|
label1 : {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
}
|
|
|
|
#pragma omp depobj // expected-error {{expected depobj expression}}
|
|
#pragma omp depobj( // expected-error {{expected expression}} expected-error {{expected depobj expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
|
|
#pragma omp depobj() // expected-error {{expected expression}} expected-error {{expected depobj expression}}
|
|
#pragma omp depobj(argc // expected-error {{expected ')'}} expected-note {{to match this '('}} expected-error {{expected lvalue expression of 'omp_depend_t' type, not 'int'}}}
|
|
#pragma omp depobj(argc, // expected-error {{expected ')'}} expected-note {{to match this '('}} expected-error {{expected lvalue expression of 'omp_depend_t' type, not 'int'}}
|
|
#pragma omp depobj(argc) // expected-error {{expected lvalue expression of 'omp_depend_t' type, not 'int'}}
|
|
#pragma omp depobj(S1) // expected-error {{'S1' does not refer to a value}} expected-error {{expected depobj expression}}
|
|
#pragma omp depobj(argc) depobj(argc) // expected-warning {{extra tokens at the end of '#pragma omp depobj' are ignored}} expected-error {{expected lvalue expression of 'omp_depend_t' type, not 'int'}}}
|
|
#pragma omp parallel depobj(argc) // expected-warning {{extra tokens at the end of '#pragma omp parallel' are ignored}}
|
|
;
|
|
return T();
|
|
}
|
|
|
|
int main(int argc, char **argv) {
|
|
omp_depend_t x;
|
|
#pragma omp depobj(x) depend(in:s)
|
|
;
|
|
#pragma omp depobj(x) untied // expected-error {{unexpected OpenMP clause 'untied' in directive '#pragma omp depobj'}}
|
|
#pragma omp depobj(x) unknown // expected-warning {{extra tokens at the end of '#pragma omp depobj' are ignored}}
|
|
if (argc)
|
|
#pragma omp depobj(x) depend(in:s) // expected-error {{'#pragma omp depobj' cannot be an immediate substatement}}
|
|
if (argc) {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
}
|
|
while (argc)
|
|
#pragma omp depobj(x) depend(in:s) // expected-error {{'#pragma omp depobj' cannot be an immediate substatement}}
|
|
while (argc) {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
}
|
|
do
|
|
#pragma omp depobj(x) depend(in:s) // expected-error {{'#pragma omp depobj' cannot be an immediate substatement}}
|
|
while (argc)
|
|
;
|
|
do {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
} while (argc);
|
|
switch (argc)
|
|
#pragma omp depobj(x) depend(in:s) // expected-error {{'#pragma omp depobj' cannot be an immediate substatement}}
|
|
switch (argc)
|
|
case 1:
|
|
#pragma omp depobj(x) depend(in:s) // expected-error {{'#pragma omp depobj' cannot be an immediate substatement}}
|
|
switch (argc)
|
|
case 1: {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
}
|
|
switch (argc) {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
case 1:
|
|
#pragma omp depobj(x) depend(in:s)
|
|
break;
|
|
default: {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
} break;
|
|
}
|
|
for (;;)
|
|
#pragma omp depobj(x) depend(in:s) // expected-error {{'#pragma omp depobj' cannot be an immediate substatement}}
|
|
for (;;) {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
}
|
|
label:
|
|
#pragma omp depobj(x) depend(in:s)
|
|
label1 : {
|
|
#pragma omp depobj(x) depend(in:s)
|
|
}
|
|
|
|
#pragma omp depobj // expected-error {{expected depobj expression}}
|
|
#pragma omp depobj( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} expected-error {{expected depobj expression}}
|
|
#pragma omp depobj() // expected-error {{expected expression}} expected-error {{expected depobj expression}}
|
|
#pragma omp depobj(argc // expected-error {{expected ')'}} expected-note {{to match this '('}} expected-error {{expected lvalue expression of 'omp_depend_t' type, not 'int'}}
|
|
#pragma omp depobj(argc, // expected-error {{expected ')'}} expected-note {{to match this '('}} expected-error {{expected lvalue expression of 'omp_depend_t' type, not 'int'}}
|
|
#pragma omp depobj(argc) // expected-error {{expected lvalue expression of 'omp_depend_t' type, not 'int'}}
|
|
#pragma omp depobj(S1) // expected-error {{'S1' does not refer to a value}} expected-error {{expected depobj expression}}
|
|
#pragma omp depobj(argc) depobj(argc) // expected-warning {{extra tokens at the end of '#pragma omp depobj' are ignored}} expected-error {{expected lvalue expression of 'omp_depend_t' type, not 'int'}}
|
|
#pragma omp parallel depobj(argc) // expected-warning {{extra tokens at the end of '#pragma omp parallel' are ignored}}
|
|
;
|
|
#pragma omp depobj(x) seq_cst // expected-error {{unexpected OpenMP clause 'seq_cst' in directive '#pragma omp depobj'}}
|
|
#pragma omp depobj(x) depend(in: x)
|
|
#pragma omp depobj(x) (x) depend(in: x) // expected-warning {{extra tokens at the end of '#pragma omp depobj' are ignored}}
|
|
#pragma omp depobj(x) depend(in: x) depend(out:x) // expected-error {{exactly one of 'depend', 'destroy', or 'update' clauses is expected}}
|
|
#pragma omp depend(out:x) depobj(x) // expected-error {{expected an OpenMP directive}}
|
|
#pragma omp depobj depend(in:x) (x) // expected-error {{expected depobj expression}} expected-warning {{extra tokens at the end of '#pragma omp depobj' are ignored}}
|
|
return tmain(argc); // expected-note {{in instantiation of function template specialization 'tmain<int>' requested here}}
|
|
}
|