1 | // RUN: %clang_cc1 -triple x86_64-apple-macos10.7.0 -verify -fopenmp -ferror-limit 100 %s |
2 | |
3 | // RUN: %clang_cc1 -triple x86_64-apple-macos10.7.0 -verify -fopenmp-simd -ferror-limit 100 %s |
4 | |
5 | extern int omp_default_mem_alloc; |
6 | void foo() { |
7 | } |
8 | |
9 | bool foobool(int argc) { |
10 | return argc; |
11 | } |
12 | |
13 | struct S1; // expected-note {{declared here}} expected-note {{forward declaration of 'S1'}} |
14 | extern S1 a; |
15 | class S2 { |
16 | mutable int a; |
17 | public: |
18 | S2():a(0) { } |
19 | static float S2s; // expected-note {{predetermined as shared}} |
20 | }; |
21 | const S2 b; |
22 | const S2 ba[5]; |
23 | class S3 { |
24 | int a; |
25 | public: |
26 | S3():a(0) { } |
27 | }; |
28 | const S3 c; // expected-note {{'c' defined here}} |
29 | const S3 ca[5]; // expected-note {{'ca' defined here}} |
30 | extern const int f; // expected-note {{'f' declared here}} |
31 | class S4 { |
32 | int a; |
33 | S4(); // expected-note {{implicitly declared private here}} |
34 | public: |
35 | S4(int v):a(v) { } |
36 | }; |
37 | class S5 { |
38 | int a; |
39 | S5():a(0) {} // expected-note {{implicitly declared private here}} |
40 | public: |
41 | S5(int v):a(v) { } |
42 | }; |
43 | |
44 | S3 h; |
45 | #pragma omp threadprivate(h) // expected-note {{defined as threadprivate or thread local}} |
46 | |
47 | |
48 | int main(int argc, char **argv) { |
49 | const int d = 5; // expected-note {{'d' defined here}} |
50 | const int da[5] = { 0 }; // expected-note {{'da' defined here}} |
51 | S4 e(4); |
52 | S5 g(5); |
53 | int i; |
54 | int &j = i; |
55 | #pragma omp distribute private // expected-error {{expected '(' after 'private'}} |
56 | for (int k = 0; k < argc; ++k) ++k; |
57 | #pragma omp distribute private ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} |
58 | for (int k = 0; k < argc; ++k) ++k; |
59 | #pragma omp distribute private () // expected-error {{expected expression}} |
60 | for (int k = 0; k < argc; ++k) ++k; |
61 | #pragma omp distribute private (argc // expected-error {{expected ')'}} expected-note {{to match this '('}} |
62 | for (int k = 0; k < argc; ++k) ++k; |
63 | #pragma omp distribute private (argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} |
64 | for (int k = 0; k < argc; ++k) ++k; |
65 | #pragma omp distribute private (argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}} |
66 | for (int k = 0; k < argc; ++k) ++k; |
67 | #pragma omp distribute private (argc) allocate , allocate(, allocate(omp_default , allocate(omp_default_mem_alloc, allocate(omp_default_mem_alloc:, allocate(omp_default_mem_alloc: argc, allocate(omp_default_mem_alloc: argv), allocate(argv) // expected-error {{expected '(' after 'allocate'}} expected-error 2 {{expected expression}} expected-error 2 {{expected ')'}} expected-error {{use of undeclared identifier 'omp_default'}} expected-note 2 {{to match this '('}} |
68 | for (int k = 0; k < argc; ++k) ++k; |
69 | #pragma omp distribute private (S1) // expected-error {{'S1' does not refer to a value}} |
70 | for (int k = 0; k < argc; ++k) ++k; |
71 | #pragma omp distribute private (a, b, c, d, f) // expected-error {{private variable with incomplete type 'S1'}} expected-error 1 {{const-qualified variable without mutable fields cannot be private}} expected-error 2 {{const-qualified variable cannot be private}} |
72 | for (int k = 0; k < argc; ++k) ++k; |
73 | #pragma omp distribute private (argv[1]) // expected-error {{expected variable name}} |
74 | for (int k = 0; k < argc; ++k) ++k; |
75 | #pragma omp distribute private(ba) |
76 | for (int k = 0; k < argc; ++k) ++k; |
77 | #pragma omp distribute private(ca) // expected-error {{const-qualified variable without mutable fields cannot be private}} |
78 | for (int k = 0; k < argc; ++k) ++k; |
79 | #pragma omp distribute private(da) // expected-error {{const-qualified variable cannot be private}} |
80 | for (int k = 0; k < argc; ++k) ++k; |
81 | #pragma omp distribute private(S2::S2s) // expected-error {{shared variable cannot be private}} |
82 | for (int k = 0; k < argc; ++k) ++k; |
83 | #pragma omp distribute private(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}} |
84 | for (int k = 0; k < argc; ++k) ++k; |
85 | #pragma omp distribute private(h) // expected-error {{threadprivate or thread local variable cannot be private}} |
86 | for (int k = 0; k < argc; ++k) ++k; |
87 | #pragma omp distribute shared(i) // expected-error {{unexpected OpenMP clause 'shared' in directive '#pragma omp distribute'}} |
88 | for (int k = 0; k < argc; ++k) ++k; |
89 | #pragma omp target |
90 | #pragma omp teams |
91 | { |
92 | int i; // expected-note {{predetermined as private}} |
93 | #pragma omp distribute firstprivate(i) // expected-error {{firstprivate variable must be shared}} |
94 | for (int k = 0; k < argc; ++k) ++k; |
95 | } |
96 | #pragma omp target |
97 | #pragma omp teams private(i) |
98 | #pragma omp distribute private(j) |
99 | for (int k = 0; k < argc; ++k) ++k; |
100 | #pragma omp parallel private(i) |
101 | #pragma omp target |
102 | #pragma omp teams firstprivate(i) |
103 | #pragma omp parallel private(i) |
104 | {} |
105 | #pragma omp target |
106 | #pragma omp teams reduction(+:i) |
107 | #pragma omp distribute private(i) |
108 | for (int k = 0; k < argc; ++k) ++k; |
109 | #pragma omp distribute private(i) |
110 | for (int k = 0; k < 10; ++k) { |
111 | #pragma omp target |
112 | #pragma omp teams private(i) |
113 | #pragma omp distribute private(i) |
114 | for (int x = 0; x < 10; ++x) foo(); |
115 | } |
116 | #pragma omp target |
117 | #pragma omp teams |
118 | #pragma omp distribute firstprivate(i) |
119 | for (int k = 0; k < 10; ++k) { |
120 | } |
121 | #pragma omp target |
122 | #pragma omp teams firstprivate(i) |
123 | #pragma omp distribute private(i) |
124 | for (int x = 0; x < 10; ++x) foo(); |
125 | #pragma omp target |
126 | #pragma omp teams reduction(+:i) |
127 | #pragma omp distribute |
128 | for (int k = 0; k < 10; ++k) { |
129 | } |
130 | #pragma omp target |
131 | #pragma omp teams reduction(+:i) |
132 | #pragma omp distribute private(i) |
133 | for (int x = 0; x < 10; ++x) foo(); |
134 | |
135 | return 0; |
136 | } |
137 | |