1 // RUN: %clang_cc1 -verify -fopenmp -ferror-limit 100 %s
2
foo()3 void foo() {
4 }
5
foobool(int argc)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}}
tmain(T argc,S ** argv)13 int tmain(T argc, S **argv) {
14 #pragma omp parallel if // expected-error {{expected '(' after 'if'}}
15 #pragma omp parallel if ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
16 #pragma omp parallel if () // expected-error {{expected expression}}
17 #pragma omp parallel if (argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
18 #pragma omp parallel if (argc)) // expected-warning {{extra tokens at the end of '#pragma omp parallel' are ignored}}
19 #pragma omp parallel if (argc > 0 ? argv[1] : argv[2])
20 #pragma omp parallel if (foobool(argc)), if (true) // expected-error {{directive '#pragma omp parallel' cannot contain more than one 'if' clause}}
21 #pragma omp parallel if (S) // expected-error {{'S' does not refer to a value}}
22 #pragma omp parallel if (argv[1]=2) // expected-error {{expected ')'}} expected-note {{to match this '('}}
23 #pragma omp parallel if (argc argc) // expected-error {{expected ')'}} expected-note {{to match this '('}}
24 #pragma omp parallel if(argc)
25 #pragma omp parallel if(parallel // expected-warning {{missing ':' after directive name modifier - ignoring}} expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
26 #pragma omp parallel if(parallel : // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
27 #pragma omp parallel if(parallel : argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
28 #pragma omp parallel if(parallel : argc)
29 #pragma omp parallel if(parallel : argc) if (for:argc) // expected-error {{directive name modifier 'for' is not allowed for '#pragma omp parallel'}}
30 #pragma omp parallel if(parallel : argc) if (parallel:argc) // expected-error {{directive '#pragma omp parallel' cannot contain more than one 'if' clause with 'parallel' name modifier}}
31 #pragma omp parallel if(parallel : argc) if (argc) // expected-error {{no more 'if' clause is allowed}} expected-note {{previous clause with directive name modifier specified here}}
32 foo();
33
34 return 0;
35 }
36
main(int argc,char ** argv)37 int main(int argc, char **argv) {
38 #pragma omp parallel if // expected-error {{expected '(' after 'if'}}
39 #pragma omp parallel if ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
40 #pragma omp parallel if () // expected-error {{expected expression}}
41 #pragma omp parallel if (argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
42 #pragma omp parallel if (argc)) // expected-warning {{extra tokens at the end of '#pragma omp parallel' are ignored}}
43 #pragma omp parallel if (argc > 0 ? argv[1] : argv[2])
44 #pragma omp parallel if (foobool(argc)), if (true) // expected-error {{directive '#pragma omp parallel' cannot contain more than one 'if' clause}}
45 #pragma omp parallel if (S1) // expected-error {{'S1' does not refer to a value}}
46 #pragma omp parallel if (argv[1]=2) // expected-error {{expected ')'}} expected-note {{to match this '('}}
47 #pragma omp parallel if (argc argc) // expected-error {{expected ')'}} expected-note {{to match this '('}}
48 #pragma omp parallel if (1 0) // expected-error {{expected ')'}} expected-note {{to match this '('}}
49 #pragma omp parallel if(if(tmain(argc, argv) // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
50 #pragma omp parallel if(parallel // expected-warning {{missing ':' after directive name modifier - ignoring}} expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
51 #pragma omp parallel if(parallel : // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
52 #pragma omp parallel if(parallel : argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
53 #pragma omp parallel if(parallel : argc)
54 #pragma omp parallel if(parallel : argc) if (for:argc) // expected-error {{directive name modifier 'for' is not allowed for '#pragma omp parallel'}}
55 #pragma omp parallel if(parallel : argc) if (parallel:argc) // expected-error {{directive '#pragma omp parallel' cannot contain more than one 'if' clause with 'parallel' name modifier}}
56 #pragma omp parallel if(parallel : argc) if (argc) // expected-error {{no more 'if' clause is allowed}} expected-note {{previous clause with directive name modifier specified here}}
57 foo();
58
59 return tmain(argc, argv);
60 }
61