1 | // RUN: %clang_cc1 -verify -fopenmp -fopenmp-version=45 %s |
2 | |
3 | // RUN: %clang_cc1 -verify -fopenmp-simd -fopenmp-version=45 %s |
4 | |
5 | void foo() { |
6 | } |
7 | |
8 | bool foobool(int argc) { |
9 | return argc; |
10 | } |
11 | |
12 | struct S1; // expected-note {{declared here}} |
13 | |
14 | template <class T, class S> // expected-note {{declared here}} |
15 | int tmain(T argc, S **argv) { |
16 | #pragma omp target parallel if // expected-error {{expected '(' after 'if'}} |
17 | foo(); |
18 | #pragma omp target parallel if ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} |
19 | foo(); |
20 | #pragma omp target parallel if () // expected-error {{expected expression}} |
21 | foo(); |
22 | #pragma omp target parallel if (argc // expected-error {{expected ')'}} expected-note {{to match this '('}} |
23 | foo(); |
24 | #pragma omp target parallel if (argc)) // expected-warning {{extra tokens at the end of '#pragma omp target parallel' are ignored}} |
25 | foo(); |
26 | #pragma omp target parallel if (argc > 0 ? argv[1] : argv[2]) |
27 | foo(); |
28 | #pragma omp target parallel if (foobool(argc)), if (true) // expected-error {{directive '#pragma omp target parallel' cannot contain more than one 'if' clause}} |
29 | foo(); |
30 | #pragma omp target parallel if (S) // expected-error {{'S' does not refer to a value}} |
31 | foo(); |
32 | #pragma omp target parallel if (argv[1]=2) // expected-error {{expected ')'}} expected-note {{to match this '('}} |
33 | foo(); |
34 | #pragma omp target parallel if (argc argc) // expected-error {{expected ')'}} expected-note {{to match this '('}} |
35 | foo(); |
36 | #pragma omp target parallel if(argc) |
37 | foo(); |
38 | #pragma omp target parallel if(target : // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} |
39 | foo(); |
40 | #pragma omp target parallel if(parallel : argc // expected-error {{expected ')'}} expected-note {{to match this '('}} |
41 | foo(); |
42 | #pragma omp target parallel if(target : argc) |
43 | foo(); |
44 | #pragma omp target parallel if(parallel : argc) |
45 | foo(); |
46 | #pragma omp target parallel if(target : argc) if(parallel : argc) |
47 | foo(); |
48 | #pragma omp target parallel if(parallel : argc) if (for:argc) // expected-error {{directive name modifier 'for' is not allowed for '#pragma omp target parallel'}} |
49 | foo(); |
50 | #pragma omp target parallel if(target : argc) if (target :argc) // expected-error {{directive '#pragma omp target parallel' cannot contain more than one 'if' clause with 'target' name modifier}} |
51 | foo(); |
52 | #pragma omp target parallel if(parallel : argc) if (parallel :argc) // expected-error {{directive '#pragma omp target parallel' cannot contain more than one 'if' clause with 'parallel' name modifier}} |
53 | foo(); |
54 | #pragma omp target parallel if(target : argc) if (argc) // expected-error {{expected 'parallel' directive name modifier}} expected-note {{previous clause with directive name modifier specified here}} |
55 | foo(); |
56 | #pragma omp target parallel if(target : argc) if(parallel : argc) if (argc) // expected-error {{no more 'if' clause is allowed}} expected-note {{previous clause with directive name modifier specified here}} expected-note {{previous clause with directive name modifier specified here}} |
57 | foo(); |
58 | |
59 | return 0; |
60 | } |
61 | |
62 | int main(int argc, char **argv) { |
63 | #pragma omp target parallel if // expected-error {{expected '(' after 'if'}} |
64 | foo(); |
65 | #pragma omp target parallel if ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} |
66 | foo(); |
67 | #pragma omp target parallel if () // expected-error {{expected expression}} |
68 | foo(); |
69 | #pragma omp target parallel if (argc // expected-error {{expected ')'}} expected-note {{to match this '('}} |
70 | foo(); |
71 | #pragma omp target parallel if (argc)) // expected-warning {{extra tokens at the end of '#pragma omp target parallel' are ignored}} |
72 | foo(); |
73 | #pragma omp target parallel if (argc > 0 ? argv[1] : argv[2]) |
74 | foo(); |
75 | #pragma omp target parallel if (foobool(argc)), if (true) // expected-error {{directive '#pragma omp target parallel' cannot contain more than one 'if' clause}} |
76 | foo(); |
77 | #pragma omp target parallel if (S1) // expected-error {{'S1' does not refer to a value}} |
78 | foo(); |
79 | #pragma omp target parallel if (argv[1]=2) // expected-error {{expected ')'}} expected-note {{to match this '('}} |
80 | foo(); |
81 | #pragma omp target parallel if (argc argc) // expected-error {{expected ')'}} expected-note {{to match this '('}} |
82 | foo(); |
83 | #pragma omp target parallel if (1 0) // expected-error {{expected ')'}} expected-note {{to match this '('}} |
84 | foo(); |
85 | #pragma omp target parallel if(if(tmain(argc, argv) // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} |
86 | foo(); |
87 | #pragma omp target parallel if(target : // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} |
88 | foo(); |
89 | #pragma omp target parallel if(parallel : argc // expected-error {{expected ')'}} expected-note {{to match this '('}} |
90 | foo(); |
91 | #pragma omp target parallel if(parallel : argc) |
92 | foo(); |
93 | #pragma omp target parallel if(target : argc) if (for:argc) // expected-error {{directive name modifier 'for' is not allowed for '#pragma omp target parallel'}} |
94 | foo(); |
95 | #pragma omp target parallel if(target : argc) if (target :argc) // expected-error {{directive '#pragma omp target parallel' cannot contain more than one 'if' clause with 'target' name modifier}} |
96 | foo(); |
97 | #pragma omp target parallel if(parallel : argc) if (parallel :argc) // expected-error {{directive '#pragma omp target parallel' cannot contain more than one 'if' clause with 'parallel' name modifier}} |
98 | foo(); |
99 | #pragma omp target parallel if(target : argc) if (argc) // expected-error {{expected 'parallel' directive name modifier}} expected-note {{previous clause with directive name modifier specified here}} |
100 | foo(); |
101 | #pragma omp target parallel if(target : argc) if(parallel : argc) if (argc) // expected-error {{no more 'if' clause is allowed}} expected-note {{previous clause with directive name modifier specified here}} expected-note {{previous clause with directive name modifier specified here}} |
102 | foo(); |
103 | |
104 | return tmain(argc, argv); |
105 | } |
106 | |