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