xref: /llvm-project/clang/test/OpenMP/target_parallel_for_private_messages.cpp (revision e04483ee35ba28c089cbbcec97a96b67ce0a035e)
1 // RUN: %clang_cc1 -verify -fopenmp %s
2 
3 // RUN: %clang_cc1 -verify -fopenmp-simd %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 2 {{declared here}} expected-note 2 {{forward declaration of 'S1'}}
14 extern S1 a;
15 class S2 {
16   mutable int a;
17 
18 public:
19   S2() : a(0) {}
20 };
21 const S2 b;
22 const S2 ba[5];
23 class S3 {
24   int a;
25 
26 public:
27   S3() : a(0) {}
28 };
29 const S3 ca[5];
30 class S4 {
31   int a;
32   S4(); // expected-note {{implicitly declared private here}}
33 
34 public:
35   S4(int v) : a(v) {
36 #pragma omp target parallel for private(a) private(this->a)
37     for (int k = 0; k < v; ++k)
38       ++this->a;
39   }
40 };
41 class S5 {
42   int a;
43   S5() : a(0) {} // expected-note {{implicitly declared private here}}
44 
45 public:
46   S5(int v) : a(v) {}
47   S5 &operator=(S5 &s) {
48 #pragma omp target parallel for private(a) private(this->a) private(s.a) // expected-error {{expected variable name or data member of current class}}
49     for (int k = 0; k < s.a; ++k) // expected-warning {{Non-trivial type 'S5' is mapped, only trivial types are guaranteed to be mapped correctly}}
50       ++s.a;
51     return *this;
52   }
53 };
54 
55 template <typename T>
56 class S6 {
57 public:
58   T a;
59 
60   S6() : a(0) {}
61   S6(T v) : a(v) {
62 #pragma omp target parallel for private(a) private(this->a)
63     for (int k = 0; k < v; ++k)
64       ++this->a;
65   }
66   S6 &operator=(S6 &s) {
67 #pragma omp target parallel for private(a) private(this->a) private(s.a) // expected-error {{expected variable name or data member of current class}}
68     for (int k = 0; k < s.a; ++k)
69       ++s.a;
70     return *this;
71   }
72 };
73 
74 template <typename T>
75 class S7 : public T {
76   T a;
77   S7() : a(0) {}
78 
79 public:
80   S7(T v) : a(v) {
81 #pragma omp target parallel for private(a) private(this->a) private(T::a)
82     for (int k = 0; k < a.a; ++k)
83       ++this->a.a;
84   }
85   S7 &operator=(S7 &s) {
86 #pragma omp target parallel for private(a) private(this->a) private(s.a) private(s.T::a) // expected-error 2 {{expected variable name or data member of current class}}
87     for (int k = 0; k < s.a.a; ++k)
88       ++s.a.a;
89     return *this;
90   }
91 };
92 
93 S3 h;
94 #pragma omp threadprivate(h) // expected-note 2 {{defined as threadprivate or thread local}}
95 
96 template <class I, class C>
97 int foomain(I argc, C **argv) {
98   I e(4);
99   I g(5);
100   int i;
101   int &j = i;
102 #pragma omp target parallel for private // expected-error {{expected '(' after 'private'}}
103   for (int k = 0; k < argc; ++k)
104     ++k;
105 #pragma omp target parallel for private( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
106   for (int k = 0; k < argc; ++k)
107     ++k;
108 #pragma omp target parallel for private() // expected-error {{expected expression}}
109   for (int k = 0; k < argc; ++k)
110     ++k;
111 #pragma omp target parallel for private(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
112   for (int k = 0; k < argc; ++k)
113     ++k;
114 #pragma omp target parallel for private(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
115   for (int k = 0; k < argc; ++k)
116     ++k;
117 #pragma omp target parallel for private(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
118   for (int k = 0; k < argc; ++k)
119     ++k;
120 #pragma omp target parallel for 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 '('}}
121   for (int k = 0; k < argc; ++k)
122     ++k;
123 #pragma omp target parallel for private(S1) // expected-error {{'S1' does not refer to a value}}
124   for (int k = 0; k < argc; ++k)
125     ++k;
126 #pragma omp target parallel for private(a, b) // expected-error {{private variable with incomplete type 'S1'}}
127   for (int k = 0; k < argc; ++k)
128     ++k;
129 #pragma omp target parallel for private(argv[1]) // expected-error {{expected variable name}}
130   for (int k = 0; k < argc; ++k)
131     ++k;
132 #pragma omp target parallel for private(e, g)
133   for (int k = 0; k < argc; ++k)
134     ++k;
135 #pragma omp target parallel for private(h) // expected-error {{threadprivate or thread local variable cannot be private}}
136   for (int k = 0; k < argc; ++k)
137     ++k;
138 #pragma omp parallel
139   {
140     int v = 0;
141     int i;
142 #pragma omp target parallel for private(i)
143     for (int k = 0; k < argc; ++k) {
144       i = k;
145       v += i;
146     }
147   }
148 #pragma omp parallel shared(i)
149 #pragma omp parallel private(i)
150 #pragma omp target parallel for private(j)
151   for (int k = 0; k < argc; ++k)
152     ++k;
153 #pragma omp target parallel for private(i)
154   for (int k = 0; k < argc; ++k)
155     ++k;
156   return 0;
157 }
158 
159 namespace A {
160 double x;
161 #pragma omp threadprivate(x) // expected-note {{defined as threadprivate or thread local}}
162 }
163 namespace B {
164 using A::x;
165 }
166 
167 int main(int argc, char **argv) {
168   S4 e(4);
169   S5 g(5);
170   S6<float> s6(0.0) , s6_0(1.0);
171   S7<S6<float> > s7(0.0) , s7_0(1.0);
172   int i;
173   int &j = i;
174 #pragma omp target parallel for private // expected-error {{expected '(' after 'private'}}
175   for (int k = 0; k < argc; ++k)
176     ++k;
177 #pragma omp target parallel for private( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
178   for (int k = 0; k < argc; ++k)
179     ++k;
180 #pragma omp target parallel for private() // expected-error {{expected expression}}
181   for (int k = 0; k < argc; ++k)
182     ++k;
183 #pragma omp target parallel for private(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
184   for (int k = 0; k < argc; ++k)
185     ++k;
186 #pragma omp target parallel for private(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
187   for (int k = 0; k < argc; ++k)
188     ++k;
189 #pragma omp target parallel for private(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
190   for (int k = 0; k < argc; ++k)
191     ++k;
192 #pragma omp target parallel for private(argc)
193   for (int k = 0; k < argc; ++k)
194     ++k;
195 #pragma omp target parallel for private(S1) // expected-error {{'S1' does not refer to a value}}
196   for (int k = 0; k < argc; ++k)
197     ++k;
198 #pragma omp target parallel for private(a, b) // expected-error {{private variable with incomplete type 'S1'}}
199   for (int k = 0; k < argc; ++k)
200     ++k;
201 #pragma omp target parallel for private(argv[1]) // expected-error {{expected variable name}}
202   for (int k = 0; k < argc; ++k)
203     ++k;
204 #pragma omp target parallel for private(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}}
205   for (int k = 0; k < argc; ++k)
206     ++k;
207 #pragma omp target parallel for private(h, B::x) // expected-error 2 {{threadprivate or thread local variable cannot be private}}
208   for (int k = 0; k < argc; ++k)
209     ++k;
210 #pragma omp parallel
211   {
212     int i;
213 #pragma omp target parallel for private(i)
214     for (int k = 0; k < argc; ++k)
215       ++k;
216   }
217 #pragma omp parallel shared(i)
218 #pragma omp parallel private(i)
219 #pragma omp target parallel for private(j)
220   for (int k = 0; k < argc; ++k)
221     ++k;
222 #pragma omp target parallel for private(i)
223   for (int k = 0; k < argc; ++k)
224     ++k;
225   static int m;
226 #pragma omp target parallel for private(m)
227   for (int k = 0; k < argc; ++k)
228     m = k + 2;
229 
230   s6 = s6_0; // expected-note {{in instantiation of member function 'S6<float>::operator=' requested here}}
231   s7 = s7_0; // expected-note {{in instantiation of member function 'S7<S6<float> >::operator=' requested here}}
232   return foomain(argc, argv); // expected-note {{in instantiation of function template specialization 'foomain<int, char>' requested here}}
233 }
234 
235