]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - test/OpenMP/target_if_messages.cpp
Vendor import of clang trunk r238337:
[FreeBSD/FreeBSD.git] / test / OpenMP / target_if_messages.cpp
1 // RUN: %clang_cc1 -verify -fopenmp %s
2
3 void foo() {
4 }
5
6 bool foobool(int argc) {
7   return argc;
8 }
9
10 struct S1; // expected-note {{declared here}}
11
12 template <class T, class S> // expected-note {{declared here}}
13 int tmain(T argc, S **argv) {
14   #pragma omp target if // expected-error {{expected '(' after 'if'}}
15   #pragma omp target if ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
16   #pragma omp target if () // expected-error {{expected expression}}
17   #pragma omp target if (argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
18   #pragma omp target if (argc)) // expected-warning {{extra tokens at the end of '#pragma omp target' are ignored}}
19   #pragma omp target if (argc > 0 ? argv[1] : argv[2])
20   #pragma omp target if (foobool(argc)), if (true) // expected-error {{directive '#pragma omp target' cannot contain more than one 'if' clause}}
21   #pragma omp target if (S) // expected-error {{'S' does not refer to a value}}
22   #pragma omp target if (argv[1]=2) // expected-error {{expected ')'}} expected-note {{to match this '('}}
23   #pragma omp target if (argc argc) // expected-error {{expected ')'}} expected-note {{to match this '('}}
24   #pragma omp target if(argc)
25   foo();
26
27   return 0;
28 }
29
30 int main(int argc, char **argv) {
31   #pragma omp target if // expected-error {{expected '(' after 'if'}}
32   #pragma omp target if ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
33   #pragma omp target if () // expected-error {{expected expression}}
34   #pragma omp target if (argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
35   #pragma omp target if (argc)) // expected-warning {{extra tokens at the end of '#pragma omp target' are ignored}}
36   #pragma omp target if (argc > 0 ? argv[1] : argv[2])
37   #pragma omp target if (foobool(argc)), if (true) // expected-error {{directive '#pragma omp target' cannot contain more than one 'if' clause}}
38   #pragma omp target if (S1) // expected-error {{'S1' does not refer to a value}}
39   #pragma omp target if (argv[1]=2) // expected-error {{expected ')'}} expected-note {{to match this '('}}
40   #pragma omp target if (argc argc) // expected-error {{expected ')'}} expected-note {{to match this '('}}
41   #pragma omp target if (1 0) // expected-error {{expected ')'}} expected-note {{to match this '('}}
42   #pragma omp target if(if(tmain(argc, argv) // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
43   foo();
44
45   return tmain(argc, argv);
46 }