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