1 // RUN: %clang_cc1 -verify -fopenmp=libiomp5 %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 2 {{declared here}} expected-note 2 {{forward declaration of 'S1'}}
11 extern S1 a;
12 class S2 {
13 mutable int a;
14
15 public:
S2()16 S2() : a(0) {}
S2(const S2 & s2)17 S2(const S2 &s2) : a(s2.a) {}
18 static float S2s;
19 static const float S2sc;
20 };
21 const float S2::S2sc = 0;
22 const S2 b;
23 const S2 ba[5];
24 class S3 {
25 int a;
26 S3 &operator=(const S3 &s3);
27
28 public:
S3()29 S3() : a(0) {}
S3(const S3 & s3)30 S3(const S3 &s3) : a(s3.a) {}
31 };
32 const S3 c;
33 const S3 ca[5];
34 extern const int f;
35 class S4 {
36 int a;
37 S4();
38 S4(const S4 &s4); // expected-note 2 {{implicitly declared private here}}
39
40 public:
S4(int v)41 S4(int v) : a(v) {}
42 };
43 class S5 {
44 int a;
S5(const S5 & s5)45 S5(const S5 &s5) : a(s5.a) {} // expected-note 4 {{implicitly declared private here}}
46
47 public:
S5()48 S5() : a(0) {}
S5(int v)49 S5(int v) : a(v) {}
50 };
51 class S6 {
52 int a;
S6()53 S6() : a(0) {}
54
55 public:
S6(const S6 & s6)56 S6(const S6 &s6) : a(s6.a) {}
S6(int v)57 S6(int v) : a(v) {}
58 };
59
60 S3 h;
61 #pragma omp threadprivate(h) // expected-note 2 {{defined as threadprivate or thread local}}
62
63 template <class I, class C>
foomain(int argc,char ** argv)64 int foomain(int argc, char **argv) {
65 I e(4);
66 C g(5);
67 int i;
68 int &j = i; // expected-note {{'j' defined here}}
69 #pragma omp parallel
70 #pragma omp sections firstprivate // expected-error {{expected '(' after 'firstprivate'}}
71 {
72 foo();
73 }
74 #pragma omp parallel
75 #pragma omp sections firstprivate( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
76 {
77 foo();
78 }
79 #pragma omp parallel
80 #pragma omp sections firstprivate() // expected-error {{expected expression}}
81 {
82 foo();
83 }
84 #pragma omp parallel
85 #pragma omp sections firstprivate(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
86 {
87 foo();
88 }
89 #pragma omp parallel
90 #pragma omp sections firstprivate(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
91 {
92 foo();
93 }
94 #pragma omp parallel
95 #pragma omp sections firstprivate(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
96 {
97 foo();
98 }
99 #pragma omp parallel
100 #pragma omp sections firstprivate(argc)
101 {
102 foo();
103 }
104 #pragma omp parallel
105 #pragma omp sections firstprivate(S1) // expected-error {{'S1' does not refer to a value}}
106 {
107 foo();
108 }
109 #pragma omp parallel
110 #pragma omp sections firstprivate(a, b) // expected-error {{firstprivate variable with incomplete type 'S1'}}
111 {
112 foo();
113 }
114 #pragma omp parallel
115 #pragma omp sections firstprivate(argv[1]) // expected-error {{expected variable name}}
116 {
117 foo();
118 }
119 #pragma omp parallel
120 #pragma omp sections firstprivate(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}}
121 {
122 foo();
123 }
124 #pragma omp parallel
125 #pragma omp sections firstprivate(h) // expected-error {{threadprivate or thread local variable cannot be firstprivate}}
126 {
127 foo();
128 }
129 #pragma omp parallel
130 #pragma omp sections linear(i) // expected-error {{unexpected OpenMP clause 'linear' in directive '#pragma omp sections'}}
131 {
132 foo();
133 }
134 #pragma omp parallel
135 {
136 int v = 0;
137 int i; // expected-note {{variable with automatic storage duration is predetermined as private; perhaps you forget to enclose 'omp sections' directive into a parallel or another task region?}}
138 #pragma omp sections firstprivate(i) // expected-error {{private variable cannot be firstprivate}}
139 {
140 foo();
141 }
142 v += i;
143 }
144 #pragma omp parallel shared(i)
145 #pragma omp parallel private(i)
146 #pragma omp sections firstprivate(j) // expected-error {{arguments of OpenMP clause 'firstprivate' cannot be of reference type}}
147 {
148 foo();
149 }
150 #pragma omp parallel
151 #pragma omp sections firstprivate(i)
152 {
153 foo();
154 }
155 #pragma omp parallel
156 #pragma omp sections lastprivate(g) firstprivate(g) // expected-error {{calling a private constructor of class 'S5'}}
157 {
158 foo();
159 }
160 #pragma omp parallel private(i) // expected-note {{defined as private}}
161 #pragma omp sections firstprivate(i) // expected-error {{firstprivate variable must be shared}}
162 {
163 foo();
164 }
165 #pragma omp parallel reduction(+ : i) // expected-note {{defined as reduction}}
166 #pragma omp sections firstprivate(i) // expected-error {{firstprivate variable must be shared}}
167 {
168 foo();
169 }
170 return 0;
171 }
172
main(int argc,char ** argv)173 int main(int argc, char **argv) {
174 const int d = 5;
175 const int da[5] = {0};
176 S4 e(4);
177 S5 g(5);
178 S3 m;
179 S6 n(2);
180 int i;
181 int &j = i; // expected-note {{'j' defined here}}
182 #pragma omp parallel
183 #pragma omp sections firstprivate // expected-error {{expected '(' after 'firstprivate'}}
184 {
185 foo();
186 }
187 #pragma omp parallel
188 #pragma omp sections firstprivate( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
189 {
190 foo();
191 }
192 #pragma omp parallel
193 #pragma omp sections firstprivate() // expected-error {{expected expression}}
194 {
195 foo();
196 }
197 #pragma omp parallel
198 #pragma omp sections firstprivate(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
199 {
200 foo();
201 }
202 #pragma omp parallel
203 #pragma omp sections firstprivate(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
204 {
205 foo();
206 }
207 #pragma omp parallel
208 #pragma omp sections firstprivate(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
209 {
210 foo();
211 }
212 #pragma omp parallel
213 #pragma omp sections firstprivate(argc)
214 {
215 foo();
216 }
217 #pragma omp parallel
218 #pragma omp sections firstprivate(S1) // expected-error {{'S1' does not refer to a value}}
219 {
220 foo();
221 }
222 #pragma omp parallel
223 #pragma omp sections firstprivate(a, b, c, d, f) // expected-error {{firstprivate variable with incomplete type 'S1'}}
224 {
225 foo();
226 }
227 #pragma omp parallel
228 #pragma omp sections firstprivate(argv[1]) // expected-error {{expected variable name}}
229 {
230 foo();
231 }
232 #pragma omp parallel
233 #pragma omp sections firstprivate(2 * 2) // expected-error {{expected variable name}}
234 {
235 foo();
236 }
237 #pragma omp parallel
238 #pragma omp sections firstprivate(ba) // OK
239 {
240 foo();
241 }
242 #pragma omp parallel
243 #pragma omp sections firstprivate(ca) // OK
244 {
245 foo();
246 }
247 #pragma omp parallel
248 #pragma omp sections firstprivate(da) // OK
249 {
250 foo();
251 }
252 int xa;
253 #pragma omp parallel
254 #pragma omp sections firstprivate(xa) // OK
255 {
256 foo();
257 }
258 #pragma omp parallel
259 #pragma omp sections firstprivate(S2::S2s) // OK
260 {
261 foo();
262 }
263 #pragma omp parallel
264 #pragma omp sections firstprivate(S2::S2sc) // OK
265 {
266 foo();
267 }
268 #pragma omp parallel
269 #pragma omp sections safelen(5) // expected-error {{unexpected OpenMP clause 'safelen' in directive '#pragma omp sections'}}
270 {
271 foo();
272 }
273 #pragma omp parallel
274 #pragma omp sections firstprivate(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}}
275 {
276 foo();
277 }
278 #pragma omp parallel
279 #pragma omp sections firstprivate(m) // OK
280 {
281 foo();
282 }
283 #pragma omp parallel
284 #pragma omp sections firstprivate(h) // expected-error {{threadprivate or thread local variable cannot be firstprivate}}
285 {
286 foo();
287 }
288 #pragma omp parallel
289 #pragma omp sections private(xa), firstprivate(xa) // expected-error {{private variable cannot be firstprivate}} expected-note {{defined as private}}
290 {
291 foo();
292 }
293 #pragma omp parallel shared(xa)
294 #pragma omp sections firstprivate(xa) // OK: may be firstprivate
295 {
296 foo();
297 }
298 #pragma omp parallel
299 #pragma omp sections firstprivate(j) // expected-error {{arguments of OpenMP clause 'firstprivate' cannot be of reference type}}
300 {
301 foo();
302 }
303 #pragma omp parallel
304 #pragma omp sections lastprivate(g) firstprivate(g) // expected-error {{calling a private constructor of class 'S5'}}
305 {
306 foo();
307 }
308 #pragma omp parallel
309 #pragma omp sections lastprivate(n) firstprivate(n) // OK
310 {
311 foo();
312 }
313 #pragma omp parallel
314 {
315 int v = 0;
316 int i; // expected-note {{variable with automatic storage duration is predetermined as private; perhaps you forget to enclose 'omp sections' directive into a parallel or another task region?}}
317 #pragma omp sections firstprivate(i) // expected-error {{private variable cannot be firstprivate}}
318 {
319 foo();
320 }
321 v += i;
322 }
323 #pragma omp parallel private(i) // expected-note {{defined as private}}
324 #pragma omp sections firstprivate(i) // expected-error {{firstprivate variable must be shared}}
325 {
326 foo();
327 }
328 #pragma omp parallel reduction(+ : i) // expected-note {{defined as reduction}}
329 #pragma omp sections firstprivate(i) // expected-error {{firstprivate variable must be shared}}
330 {
331 foo();
332 }
333
334 return foomain<S4, S5>(argc, argv); // expected-note {{in instantiation of function template specialization 'foomain<S4, S5>' requested here}}
335 }
336