1 | // RUN: %clang_cc1 -fsyntax-only -fopenmp -verify %s |
2 | |
3 | // RUN: %clang_cc1 -fsyntax-only -fopenmp-simd -verify %s |
4 | |
5 | // expected-error@+1 {{unexpected OpenMP directive '#pragma omp for simd'}} |
6 | #pragma omp for simd |
7 | |
8 | // expected-error@+1 {{unexpected OpenMP directive '#pragma omp for simd'}} |
9 | #pragma omp for simd foo |
10 | |
11 | void test_no_clause() { |
12 | int i; |
13 | #pragma omp for simd |
14 | for (i = 0; i < 16; ++i) |
15 | ; |
16 | |
17 | // expected-error@+2 {{statement after '#pragma omp for simd' must be a for loop}} |
18 | #pragma omp for simd |
19 | ++i; |
20 | } |
21 | |
22 | void test_branch_protected_scope() { |
23 | int i = 0; |
24 | L1: |
25 | ++i; |
26 | |
27 | int x[24]; |
28 | |
29 | #pragma omp parallel |
30 | #pragma omp for simd |
31 | for (i = 0; i < 16; ++i) { |
32 | if (i == 5) |
33 | goto L1; // expected-error {{use of undeclared label 'L1'}} |
34 | else if (i == 6) |
35 | return; // expected-error {{cannot return from OpenMP region}} |
36 | else if (i == 7) |
37 | goto L2; |
38 | else if (i == 8) { |
39 | L2: |
40 | x[i]++; |
41 | } |
42 | } |
43 | |
44 | if (x[0] == 0) |
45 | goto L2; // expected-error {{use of undeclared label 'L2'}} |
46 | else if (x[1] == 1) |
47 | goto L1; |
48 | } |
49 | |
50 | void test_invalid_clause() { |
51 | int i; |
52 | #pragma omp parallel |
53 | // expected-warning@+1 {{extra tokens at the end of '#pragma omp for simd' are ignored}} |
54 | #pragma omp for simd foo bar |
55 | for (i = 0; i < 16; ++i) |
56 | ; |
57 | } |
58 | |
59 | void test_non_identifiers() { |
60 | int i, x; |
61 | |
62 | #pragma omp parallel |
63 | // expected-warning@+1 {{extra tokens at the end of '#pragma omp for simd' are ignored}} |
64 | #pragma omp for simd; |
65 | for (i = 0; i < 16; ++i) |
66 | ; |
67 | #pragma omp parallel |
68 | // expected-warning@+1 {{extra tokens at the end of '#pragma omp for simd' are ignored}} |
69 | #pragma omp for simd linear(x); |
70 | for (i = 0; i < 16; ++i) |
71 | ; |
72 | |
73 | #pragma omp parallel |
74 | // expected-warning@+1 {{extra tokens at the end of '#pragma omp for simd' are ignored}} |
75 | #pragma omp for simd private(x); |
76 | for (i = 0; i < 16; ++i) |
77 | ; |
78 | |
79 | #pragma omp parallel |
80 | // expected-warning@+1 {{extra tokens at the end of '#pragma omp for simd' are ignored}} |
81 | #pragma omp for simd, private(x); |
82 | for (i = 0; i < 16; ++i) |
83 | ; |
84 | } |
85 | |
86 | extern int foo(); |
87 | void test_safelen() { |
88 | int i; |
89 | // expected-error@+1 {{expected '('}} |
90 | #pragma omp for simd safelen |
91 | for (i = 0; i < 16; ++i) |
92 | ; |
93 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
94 | #pragma omp for simd safelen( |
95 | for (i = 0; i < 16; ++i) |
96 | ; |
97 | // expected-error@+1 {{expected expression}} |
98 | #pragma omp for simd safelen() |
99 | for (i = 0; i < 16; ++i) |
100 | ; |
101 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
102 | #pragma omp for simd safelen(, |
103 | for (i = 0; i < 16; ++i) |
104 | ; |
105 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
106 | #pragma omp for simd safelen(, ) |
107 | for (i = 0; i < 16; ++i) |
108 | ; |
109 | // expected-warning@+2 {{extra tokens at the end of '#pragma omp for simd' are ignored}} |
110 | // expected-error@+1 {{expected '('}} |
111 | #pragma omp for simd safelen 4) |
112 | for (i = 0; i < 16; ++i) |
113 | ; |
114 | // expected-error@+2 {{expected ')'}} |
115 | // expected-note@+1 {{to match this '('}} |
116 | #pragma omp for simd safelen(4 |
117 | for (i = 0; i < 16; ++i) |
118 | ; |
119 | // expected-error@+2 {{expected ')'}} |
120 | // expected-note@+1 {{to match this '('}} |
121 | #pragma omp for simd safelen(4, |
122 | for (i = 0; i < 16; ++i) |
123 | ; |
124 | // expected-error@+2 {{expected ')'}} |
125 | // expected-note@+1 {{to match this '('}} |
126 | #pragma omp for simd safelen(4, ) |
127 | for (i = 0; i < 16; ++i) |
128 | ; |
129 | #pragma omp for simd safelen(4) |
130 | for (i = 0; i < 16; ++i) |
131 | ; |
132 | // expected-error@+2 {{expected ')'}} |
133 | // expected-note@+1 {{to match this '('}} |
134 | #pragma omp for simd safelen(4 4) |
135 | for (i = 0; i < 16; ++i) |
136 | ; |
137 | // expected-error@+2 {{expected ')'}} |
138 | // expected-note@+1 {{to match this '('}} |
139 | #pragma omp for simd safelen(4, , 4) |
140 | for (i = 0; i < 16; ++i) |
141 | ; |
142 | #pragma omp for simd safelen(4) |
143 | for (i = 0; i < 16; ++i) |
144 | ; |
145 | // expected-error@+2 {{expected ')'}} |
146 | // expected-note@+1 {{to match this '('}} |
147 | #pragma omp for simd safelen(4, 8) |
148 | for (i = 0; i < 16; ++i) |
149 | ; |
150 | // expected-error@+1 {{expression is not an integer constant expression}} |
151 | #pragma omp for simd safelen(2.5) |
152 | for (i = 0; i < 16; ++i) |
153 | ; |
154 | // expected-error@+1 {{expression is not an integer constant expression}} |
155 | #pragma omp for simd safelen(foo()) |
156 | for (i = 0; i < 16; ++i) |
157 | ; |
158 | // expected-error@+1 {{argument to 'safelen' clause must be a strictly positive integer value}} |
159 | #pragma omp for simd safelen(-5) |
160 | for (i = 0; i < 16; ++i) |
161 | ; |
162 | // expected-error@+1 {{argument to 'safelen' clause must be a strictly positive integer value}} |
163 | #pragma omp for simd safelen(0) |
164 | for (i = 0; i < 16; ++i) |
165 | ; |
166 | // expected-error@+1 {{argument to 'safelen' clause must be a strictly positive integer value}} |
167 | #pragma omp for simd safelen(5 - 5) |
168 | for (i = 0; i < 16; ++i) |
169 | ; |
170 | } |
171 | |
172 | void test_simdlen() { |
173 | int i; |
174 | // expected-error@+1 {{expected '('}} |
175 | #pragma omp for simd simdlen |
176 | for (i = 0; i < 16; ++i) |
177 | ; |
178 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
179 | #pragma omp for simd simdlen( |
180 | for (i = 0; i < 16; ++i) |
181 | ; |
182 | // expected-error@+1 {{expected expression}} |
183 | #pragma omp for simd simdlen() |
184 | for (i = 0; i < 16; ++i) |
185 | ; |
186 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
187 | #pragma omp for simd simdlen(, |
188 | for (i = 0; i < 16; ++i) |
189 | ; |
190 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
191 | #pragma omp for simd simdlen(, ) |
192 | for (i = 0; i < 16; ++i) |
193 | ; |
194 | // expected-warning@+2 {{extra tokens at the end of '#pragma omp for simd' are ignored}} |
195 | // expected-error@+1 {{expected '('}} |
196 | #pragma omp for simd simdlen 4) |
197 | for (i = 0; i < 16; ++i) |
198 | ; |
199 | // expected-error@+2 {{expected ')'}} |
200 | // expected-note@+1 {{to match this '('}} |
201 | #pragma omp for simd simdlen(4 |
202 | for (i = 0; i < 16; ++i) |
203 | ; |
204 | // expected-error@+2 {{expected ')'}} |
205 | // expected-note@+1 {{to match this '('}} |
206 | #pragma omp for simd simdlen(4, |
207 | for (i = 0; i < 16; ++i) |
208 | ; |
209 | // expected-error@+2 {{expected ')'}} |
210 | // expected-note@+1 {{to match this '('}} |
211 | #pragma omp for simd simdlen(4, ) |
212 | for (i = 0; i < 16; ++i) |
213 | ; |
214 | #pragma omp for simd simdlen(4) |
215 | for (i = 0; i < 16; ++i) |
216 | ; |
217 | // expected-error@+2 {{expected ')'}} |
218 | // expected-note@+1 {{to match this '('}} |
219 | #pragma omp for simd simdlen(4 4) |
220 | for (i = 0; i < 16; ++i) |
221 | ; |
222 | // expected-error@+2 {{expected ')'}} |
223 | // expected-note@+1 {{to match this '('}} |
224 | #pragma omp for simd simdlen(4, , 4) |
225 | for (i = 0; i < 16; ++i) |
226 | ; |
227 | #pragma omp for simd simdlen(4) |
228 | for (i = 0; i < 16; ++i) |
229 | ; |
230 | // expected-error@+2 {{expected ')'}} |
231 | // expected-note@+1 {{to match this '('}} |
232 | #pragma omp for simd simdlen(4, 8) |
233 | for (i = 0; i < 16; ++i) |
234 | ; |
235 | // expected-error@+1 {{expression is not an integer constant expression}} |
236 | #pragma omp for simd simdlen(2.5) |
237 | for (i = 0; i < 16; ++i) |
238 | ; |
239 | // expected-error@+1 {{expression is not an integer constant expression}} |
240 | #pragma omp for simd simdlen(foo()) |
241 | for (i = 0; i < 16; ++i) |
242 | ; |
243 | // expected-error@+1 {{argument to 'simdlen' clause must be a strictly positive integer value}} |
244 | #pragma omp for simd simdlen(-5) |
245 | for (i = 0; i < 16; ++i) |
246 | ; |
247 | // expected-error@+1 {{argument to 'simdlen' clause must be a strictly positive integer value}} |
248 | #pragma omp for simd simdlen(0) |
249 | for (i = 0; i < 16; ++i) |
250 | ; |
251 | // expected-error@+1 {{argument to 'simdlen' clause must be a strictly positive integer value}} |
252 | #pragma omp for simd simdlen(5 - 5) |
253 | for (i = 0; i < 16; ++i) |
254 | ; |
255 | } |
256 | |
257 | void test_safelen_simdlen() { |
258 | int i; |
259 | // expected-error@+1 {{the value of 'simdlen' parameter must be less than or equal to the value of the 'safelen' parameter}} |
260 | #pragma omp for simd simdlen(6) safelen(5) |
261 | for (i = 0; i < 16; ++i) |
262 | ; |
263 | // expected-error@+1 {{the value of 'simdlen' parameter must be less than or equal to the value of the 'safelen' parameter}} |
264 | #pragma omp for simd safelen(5) simdlen(6) |
265 | for (i = 0; i < 16; ++i) |
266 | ; |
267 | } |
268 | |
269 | void test_collapse() { |
270 | int i; |
271 | #pragma omp parallel |
272 | // expected-error@+1 {{expected '('}} |
273 | #pragma omp for simd collapse |
274 | for (i = 0; i < 16; ++i) |
275 | ; |
276 | #pragma omp parallel |
277 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
278 | #pragma omp for simd collapse( |
279 | for (i = 0; i < 16; ++i) |
280 | ; |
281 | #pragma omp parallel |
282 | // expected-error@+1 {{expected expression}} |
283 | #pragma omp for simd collapse() |
284 | for (i = 0; i < 16; ++i) |
285 | ; |
286 | #pragma omp parallel |
287 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
288 | #pragma omp for simd collapse(, |
289 | for (i = 0; i < 16; ++i) |
290 | ; |
291 | #pragma omp parallel |
292 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
293 | #pragma omp for simd collapse(, ) |
294 | for (i = 0; i < 16; ++i) |
295 | ; |
296 | #pragma omp parallel |
297 | // expected-warning@+2 {{extra tokens at the end of '#pragma omp for simd' are ignored}} |
298 | // expected-error@+1 {{expected '('}} |
299 | #pragma omp for simd collapse 4) |
300 | for (i = 0; i < 16; ++i) |
301 | ; |
302 | #pragma omp parallel |
303 | // expected-error@+2 {{expected ')'}} |
304 | // expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}} |
305 | #pragma omp for simd collapse(4 |
306 | for (i = 0; i < 16; ++i) |
307 | ; // expected-error {{expected 4 for loops after '#pragma omp for simd', but found only 1}} |
308 | #pragma omp parallel |
309 | // expected-error@+2 {{expected ')'}} |
310 | // expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}} |
311 | #pragma omp for simd collapse(4, |
312 | for (i = 0; i < 16; ++i) |
313 | ; // expected-error {{expected 4 for loops after '#pragma omp for simd', but found only 1}} |
314 | #pragma omp parallel |
315 | // expected-error@+2 {{expected ')'}} |
316 | // expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}} |
317 | #pragma omp for simd collapse(4, ) |
318 | for (i = 0; i < 16; ++i) |
319 | ; // expected-error {{expected 4 for loops after '#pragma omp for simd', but found only 1}} |
320 | #pragma omp parallel |
321 | // expected-note@+1 {{as specified in 'collapse' clause}} |
322 | #pragma omp for simd collapse(4) |
323 | for (i = 0; i < 16; ++i) |
324 | ; // expected-error {{expected 4 for loops after '#pragma omp for simd', but found only 1}} |
325 | #pragma omp parallel |
326 | // expected-error@+2 {{expected ')'}} |
327 | // expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}} |
328 | #pragma omp for simd collapse(4 4) |
329 | for (i = 0; i < 16; ++i) |
330 | ; // expected-error {{expected 4 for loops after '#pragma omp for simd', but found only 1}} |
331 | #pragma omp parallel |
332 | // expected-error@+2 {{expected ')'}} |
333 | // expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}} |
334 | #pragma omp for simd collapse(4, , 4) |
335 | for (i = 0; i < 16; ++i) |
336 | ; // expected-error {{expected 4 for loops after '#pragma omp for simd', but found only 1}} |
337 | #pragma omp parallel |
338 | #pragma omp for simd collapse(4) |
339 | for (int i1 = 0; i1 < 16; ++i1) |
340 | for (int i2 = 0; i2 < 16; ++i2) |
341 | for (int i3 = 0; i3 < 16; ++i3) |
342 | for (int i4 = 0; i4 < 16; ++i4) |
343 | foo(); |
344 | #pragma omp parallel |
345 | // expected-error@+2 {{expected ')'}} |
346 | // expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}} |
347 | #pragma omp for simd collapse(4, 8) |
348 | for (i = 0; i < 16; ++i) |
349 | ; // expected-error {{expected 4 for loops after '#pragma omp for simd', but found only 1}} |
350 | #pragma omp parallel |
351 | // expected-error@+1 {{expression is not an integer constant expression}} |
352 | #pragma omp for simd collapse(2.5) |
353 | for (i = 0; i < 16; ++i) |
354 | ; |
355 | #pragma omp parallel |
356 | // expected-error@+1 {{expression is not an integer constant expression}} |
357 | #pragma omp for simd collapse(foo()) |
358 | for (i = 0; i < 16; ++i) |
359 | ; |
360 | #pragma omp parallel |
361 | // expected-error@+1 {{argument to 'collapse' clause must be a strictly positive integer value}} |
362 | #pragma omp for simd collapse(-5) |
363 | for (i = 0; i < 16; ++i) |
364 | ; |
365 | #pragma omp parallel |
366 | // expected-error@+1 {{argument to 'collapse' clause must be a strictly positive integer value}} |
367 | #pragma omp for simd collapse(0) |
368 | for (i = 0; i < 16; ++i) |
369 | ; |
370 | #pragma omp parallel |
371 | // expected-error@+1 {{argument to 'collapse' clause must be a strictly positive integer value}} |
372 | #pragma omp for simd collapse(5 - 5) |
373 | for (i = 0; i < 16; ++i) |
374 | ; |
375 | #pragma omp parallel |
376 | #pragma omp for simd collapse(2) |
377 | for (i = 0; i < 16; ++i) |
378 | // expected-note@+1 {{variable with automatic storage duration is predetermined as private; perhaps you forget to enclose 'omp for simd' directive into a parallel or another task region?}} |
379 | for (int j = 0; j < 16; ++j) |
380 | // expected-error@+2 {{reduction variable must be shared}} |
381 | // expected-error@+1 {{OpenMP constructs may not be nested inside a simd region}} |
382 | #pragma omp for simd reduction(+ : i, j) |
383 | for (int k = 0; k < 16; ++k) |
384 | i += j; |
385 | } |
386 | |
387 | void test_linear() { |
388 | int i; |
389 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
390 | #pragma omp for simd linear( |
391 | for (i = 0; i < 16; ++i) |
392 | ; |
393 | // expected-error@+2 {{expected expression}} |
394 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
395 | #pragma omp for simd linear(, |
396 | for (i = 0; i < 16; ++i) |
397 | ; |
398 | // expected-error@+2 {{expected expression}} |
399 | // expected-error@+1 {{expected expression}} |
400 | #pragma omp for simd linear(, ) |
401 | for (i = 0; i < 16; ++i) |
402 | ; |
403 | // expected-error@+1 {{expected expression}} |
404 | #pragma omp for simd linear() |
405 | for (i = 0; i < 16; ++i) |
406 | ; |
407 | // expected-error@+1 {{expected expression}} |
408 | #pragma omp for simd linear(int) |
409 | for (i = 0; i < 16; ++i) |
410 | ; |
411 | // expected-error@+1 {{expected variable name}} |
412 | #pragma omp for simd linear(0) |
413 | for (i = 0; i < 16; ++i) |
414 | ; |
415 | // expected-error@+1 {{use of undeclared identifier 'x'}} |
416 | #pragma omp for simd linear(x) |
417 | for (i = 0; i < 16; ++i) |
418 | ; |
419 | // expected-error@+2 {{use of undeclared identifier 'x'}} |
420 | // expected-error@+1 {{use of undeclared identifier 'y'}} |
421 | #pragma omp for simd linear(x, y) |
422 | for (i = 0; i < 16; ++i) |
423 | ; |
424 | // expected-error@+3 {{use of undeclared identifier 'x'}} |
425 | // expected-error@+2 {{use of undeclared identifier 'y'}} |
426 | // expected-error@+1 {{use of undeclared identifier 'z'}} |
427 | #pragma omp for simd linear(x, y, z) |
428 | for (i = 0; i < 16; ++i) |
429 | ; |
430 | |
431 | int x, y; |
432 | // expected-error@+1 {{expected expression}} |
433 | #pragma omp for simd linear(x :) |
434 | for (i = 0; i < 16; ++i) |
435 | ; |
436 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
437 | #pragma omp for simd linear(x :, ) |
438 | for (i = 0; i < 16; ++i) |
439 | ; |
440 | #pragma omp for simd linear(x : 1) |
441 | for (i = 0; i < 16; ++i) |
442 | ; |
443 | #pragma omp for simd linear(x : 2 * 2) |
444 | for (i = 0; i < 16; ++i) |
445 | ; |
446 | // expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
447 | #pragma omp for simd linear(x : 1, y) |
448 | for (i = 0; i < 16; ++i) |
449 | ; |
450 | // expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
451 | #pragma omp for simd linear(x : 1, y, z : 1) |
452 | for (i = 0; i < 16; ++i) |
453 | ; |
454 | |
455 | // expected-note@+2 {{defined as linear}} |
456 | // expected-error@+1 {{linear variable cannot be linear}} |
457 | #pragma omp for simd linear(x) linear(x) |
458 | for (i = 0; i < 16; ++i) |
459 | ; |
460 | |
461 | // expected-note@+2 {{defined as private}} |
462 | // expected-error@+1 {{private variable cannot be linear}} |
463 | #pragma omp for simd private(x) linear(x) |
464 | for (i = 0; i < 16; ++i) |
465 | ; |
466 | |
467 | // expected-note@+2 {{defined as linear}} |
468 | // expected-error@+1 {{linear variable cannot be private}} |
469 | #pragma omp for simd linear(x) private(x) |
470 | for (i = 0; i < 16; ++i) |
471 | ; |
472 | |
473 | // expected-warning@+1 {{zero linear step (x and other variables in clause should probably be const)}} |
474 | #pragma omp for simd linear(x, y : 0) |
475 | for (i = 0; i < 16; ++i) |
476 | ; |
477 | |
478 | // expected-note@+2 {{defined as linear}} |
479 | // expected-error@+1 {{linear variable cannot be lastprivate}} |
480 | #pragma omp for simd linear(x) lastprivate(x) |
481 | for (i = 0; i < 16; ++i) |
482 | ; |
483 | |
484 | #pragma omp parallel |
485 | // expected-note@+2 {{defined as lastprivate}} |
486 | // expected-error@+1 {{lastprivate variable cannot be linear}} |
487 | #pragma omp for simd lastprivate(x) linear(x) |
488 | for (i = 0; i < 16; ++i) |
489 | ; |
490 | } |
491 | |
492 | void test_aligned() { |
493 | int i; |
494 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
495 | #pragma omp for simd aligned( |
496 | for (i = 0; i < 16; ++i) |
497 | ; |
498 | // expected-error@+2 {{expected expression}} |
499 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
500 | #pragma omp for simd aligned(, |
501 | for (i = 0; i < 16; ++i) |
502 | ; |
503 | // expected-error@+2 {{expected expression}} |
504 | // expected-error@+1 {{expected expression}} |
505 | #pragma omp for simd aligned(, ) |
506 | for (i = 0; i < 16; ++i) |
507 | ; |
508 | // expected-error@+1 {{expected expression}} |
509 | #pragma omp for simd aligned() |
510 | for (i = 0; i < 16; ++i) |
511 | ; |
512 | // expected-error@+1 {{expected expression}} |
513 | #pragma omp for simd aligned(int) |
514 | for (i = 0; i < 16; ++i) |
515 | ; |
516 | // expected-error@+1 {{expected variable name}} |
517 | #pragma omp for simd aligned(0) |
518 | for (i = 0; i < 16; ++i) |
519 | ; |
520 | // expected-error@+1 {{use of undeclared identifier 'x'}} |
521 | #pragma omp for simd aligned(x) |
522 | for (i = 0; i < 16; ++i) |
523 | ; |
524 | // expected-error@+2 {{use of undeclared identifier 'x'}} |
525 | // expected-error@+1 {{use of undeclared identifier 'y'}} |
526 | #pragma omp for simd aligned(x, y) |
527 | for (i = 0; i < 16; ++i) |
528 | ; |
529 | // expected-error@+3 {{use of undeclared identifier 'x'}} |
530 | // expected-error@+2 {{use of undeclared identifier 'y'}} |
531 | // expected-error@+1 {{use of undeclared identifier 'z'}} |
532 | #pragma omp for simd aligned(x, y, z) |
533 | for (i = 0; i < 16; ++i) |
534 | ; |
535 | |
536 | int *x, y, z[25]; // expected-note 4 {{'y' defined here}} |
537 | #pragma omp for simd aligned(x) |
538 | for (i = 0; i < 16; ++i) |
539 | ; |
540 | #pragma omp for simd aligned(z) |
541 | for (i = 0; i < 16; ++i) |
542 | ; |
543 | // expected-error@+1 {{expected expression}} |
544 | #pragma omp for simd aligned(x :) |
545 | for (i = 0; i < 16; ++i) |
546 | ; |
547 | // expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
548 | #pragma omp for simd aligned(x :, ) |
549 | for (i = 0; i < 16; ++i) |
550 | ; |
551 | #pragma omp for simd aligned(x : 1) |
552 | for (i = 0; i < 16; ++i) |
553 | ; |
554 | #pragma omp for simd aligned(x : 2 * 2) |
555 | for (i = 0; i < 16; ++i) |
556 | ; |
557 | // expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
558 | #pragma omp for simd aligned(x : 1, y) |
559 | for (i = 0; i < 16; ++i) |
560 | ; |
561 | // expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
562 | #pragma omp for simd aligned(x : 1, y, z : 1) |
563 | for (i = 0; i < 16; ++i) |
564 | ; |
565 | |
566 | // expected-error@+1 {{argument of aligned clause should be array or pointer, not 'int'}} |
567 | #pragma omp for simd aligned(x, y) |
568 | for (i = 0; i < 16; ++i) |
569 | ; |
570 | // expected-error@+1 {{argument of aligned clause should be array or pointer, not 'int'}} |
571 | #pragma omp for simd aligned(x, y, z) |
572 | for (i = 0; i < 16; ++i) |
573 | ; |
574 | |
575 | // expected-note@+2 {{defined as aligned}} |
576 | // expected-error@+1 {{a variable cannot appear in more than one aligned clause}} |
577 | #pragma omp for simd aligned(x) aligned(z, x) |
578 | for (i = 0; i < 16; ++i) |
579 | ; |
580 | |
581 | // expected-note@+3 {{defined as aligned}} |
582 | // expected-error@+2 {{a variable cannot appear in more than one aligned clause}} |
583 | // expected-error@+1 2 {{argument of aligned clause should be array or pointer, not 'int'}} |
584 | #pragma omp for simd aligned(x, y, z) aligned(y, z) |
585 | for (i = 0; i < 16; ++i) |
586 | ; |
587 | } |
588 | |
589 | |
590 | void test_private() { |
591 | int i; |
592 | #pragma omp parallel |
593 | // expected-error@+2 {{expected expression}} |
594 | // expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}} |
595 | #pragma omp for simd private( |
596 | for (i = 0; i < 16; ++i) |
597 | ; |
598 | #pragma omp parallel |
599 | // expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}} |
600 | // expected-error@+1 2 {{expected expression}} |
601 | #pragma omp for simd private(, |
602 | for (i = 0; i < 16; ++i) |
603 | ; |
604 | #pragma omp parallel |
605 | // expected-error@+1 2 {{expected expression}} |
606 | #pragma omp for simd private(, ) |
607 | for (i = 0; i < 16; ++i) |
608 | ; |
609 | #pragma omp parallel |
610 | // expected-error@+1 {{expected expression}} |
611 | #pragma omp for simd private() |
612 | for (i = 0; i < 16; ++i) |
613 | ; |
614 | #pragma omp parallel |
615 | // expected-error@+1 {{expected expression}} |
616 | #pragma omp for simd private(int) |
617 | for (i = 0; i < 16; ++i) |
618 | ; |
619 | #pragma omp parallel |
620 | // expected-error@+1 {{expected variable name}} |
621 | #pragma omp for simd private(0) |
622 | for (i = 0; i < 16; ++i) |
623 | ; |
624 | |
625 | int x, y, z; |
626 | #pragma omp parallel |
627 | #pragma omp for simd private(x) |
628 | for (i = 0; i < 16; ++i) |
629 | ; |
630 | #pragma omp parallel |
631 | #pragma omp for simd private(x, y) |
632 | for (i = 0; i < 16; ++i) |
633 | ; |
634 | #pragma omp parallel |
635 | #pragma omp for simd private(x, y, z) |
636 | for (i = 0; i < 16; ++i) { |
637 | x = y * i + z; |
638 | } |
639 | } |
640 | |
641 | void test_lastprivate() { |
642 | int i; |
643 | #pragma omp parallel |
644 | // expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}} |
645 | // expected-error@+1 {{expected expression}} |
646 | #pragma omp for simd lastprivate( |
647 | for (i = 0; i < 16; ++i) |
648 | ; |
649 | |
650 | #pragma omp parallel |
651 | // expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}} |
652 | // expected-error@+1 2 {{expected expression}} |
653 | #pragma omp for simd lastprivate(, |
654 | for (i = 0; i < 16; ++i) |
655 | ; |
656 | #pragma omp parallel |
657 | // expected-error@+1 2 {{expected expression}} |
658 | #pragma omp for simd lastprivate(, ) |
659 | for (i = 0; i < 16; ++i) |
660 | ; |
661 | #pragma omp parallel |
662 | // expected-error@+1 {{expected expression}} |
663 | #pragma omp for simd lastprivate() |
664 | for (i = 0; i < 16; ++i) |
665 | ; |
666 | #pragma omp parallel |
667 | // expected-error@+1 {{expected expression}} |
668 | #pragma omp for simd lastprivate(int) |
669 | for (i = 0; i < 16; ++i) |
670 | ; |
671 | #pragma omp parallel |
672 | // expected-error@+1 {{expected variable name}} |
673 | #pragma omp for simd lastprivate(0) |
674 | for (i = 0; i < 16; ++i) |
675 | ; |
676 | |
677 | int x, y, z; |
678 | #pragma omp parallel |
679 | #pragma omp for simd lastprivate(x) |
680 | for (i = 0; i < 16; ++i) |
681 | ; |
682 | #pragma omp parallel |
683 | #pragma omp for simd lastprivate(x, y) |
684 | for (i = 0; i < 16; ++i) |
685 | ; |
686 | #pragma omp parallel |
687 | #pragma omp for simd lastprivate(x, y, z) |
688 | for (i = 0; i < 16; ++i) |
689 | ; |
690 | } |
691 | |
692 | void test_firstprivate() { |
693 | int i; |
694 | #pragma omp parallel |
695 | // expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}} |
696 | // expected-error@+1 {{expected expression}} |
697 | #pragma omp for simd firstprivate( |
698 | for (i = 0; i < 16; ++i) |
699 | ; |
700 | |
701 | #pragma omp parallel |
702 | // expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}} |
703 | // expected-error@+1 2 {{expected expression}} |
704 | #pragma omp for simd firstprivate(, |
705 | for (i = 0; i < 16; ++i) |
706 | ; |
707 | #pragma omp parallel |
708 | // expected-error@+1 2 {{expected expression}} |
709 | #pragma omp for simd firstprivate(, ) |
710 | for (i = 0; i < 16; ++i) |
711 | ; |
712 | #pragma omp parallel |
713 | // expected-error@+1 {{expected expression}} |
714 | #pragma omp for simd firstprivate() |
715 | for (i = 0; i < 16; ++i) |
716 | ; |
717 | #pragma omp parallel |
718 | // expected-error@+1 {{expected expression}} |
719 | #pragma omp for simd firstprivate(int) |
720 | for (i = 0; i < 16; ++i) |
721 | ; |
722 | #pragma omp parallel |
723 | // expected-error@+1 {{expected variable name}} |
724 | #pragma omp for simd firstprivate(0) |
725 | for (i = 0; i < 16; ++i) |
726 | ; |
727 | |
728 | int x, y, z; |
729 | #pragma omp parallel |
730 | #pragma omp for simd lastprivate(x) firstprivate(x) |
731 | for (i = 0; i < 16; ++i) |
732 | ; |
733 | #pragma omp parallel |
734 | #pragma omp for simd lastprivate(x, y) firstprivate(x, y) |
735 | for (i = 0; i < 16; ++i) |
736 | ; |
737 | #pragma omp parallel |
738 | #pragma omp for simd lastprivate(x, y, z) firstprivate(x, y, z) |
739 | for (i = 0; i < 16; ++i) |
740 | ; |
741 | } |
742 | |
743 | void test_loop_messages() { |
744 | float a[100], b[100], c[100]; |
745 | #pragma omp parallel |
746 | // expected-error@+2 {{variable must be of integer or pointer type}} |
747 | #pragma omp for simd |
748 | for (float fi = 0; fi < 10.0; fi++) { |
749 | c[(int)fi] = a[(int)fi] + b[(int)fi]; |
750 | } |
751 | #pragma omp parallel |
752 | // expected-error@+2 {{variable must be of integer or pointer type}} |
753 | #pragma omp for simd |
754 | for (double fi = 0; fi < 10.0; fi++) { |
755 | c[(int)fi] = a[(int)fi] + b[(int)fi]; |
756 | } |
757 | } |
758 | |
759 | |