1 // RUN: %clang_cc1 -verify -fopenmp -fopenmp-version=50 -ast-print %s -Wno-openmp-mapping | FileCheck %s
2 // RUN: %clang_cc1 -fopenmp -fopenmp-version=50 -x c++ -std=c++11 -emit-pch -o %t %s -Wno-openmp-mapping
3 // RUN: %clang_cc1 -fopenmp -fopenmp-version=50 -std=c++11 -include-pch %t -fsyntax-only -verify %s -ast-print -Wno-openmp-mapping | FileCheck %s
4 
5 // RUN: %clang_cc1 -verify -fopenmp-simd -fopenmp-version=50 -ast-print %s -Wno-openmp-mapping | FileCheck %s
6 // RUN: %clang_cc1 -fopenmp-simd -fopenmp-version=50 -x c++ -std=c++11 -emit-pch -o %t %s -Wno-openmp-mapping
7 // RUN: %clang_cc1 -fopenmp-simd -fopenmp-version=50 -std=c++11 -include-pch %t -fsyntax-only -verify %s -ast-print -Wno-openmp-mapping | FileCheck %s
8 // expected-no-diagnostics
9 
10 #ifndef HEADER
11 #define HEADER
12 
13 typedef void **omp_allocator_handle_t;
14 extern const omp_allocator_handle_t omp_null_allocator;
15 extern const omp_allocator_handle_t omp_default_mem_alloc;
16 extern const omp_allocator_handle_t omp_large_cap_mem_alloc;
17 extern const omp_allocator_handle_t omp_const_mem_alloc;
18 extern const omp_allocator_handle_t omp_high_bw_mem_alloc;
19 extern const omp_allocator_handle_t omp_low_lat_mem_alloc;
20 extern const omp_allocator_handle_t omp_cgroup_mem_alloc;
21 extern const omp_allocator_handle_t omp_pteam_mem_alloc;
22 extern const omp_allocator_handle_t omp_thread_mem_alloc;
23 
foo()24 void foo() {}
25 
26 struct S {
SS27   S(): a(0) {}
SS28   S(int v) : a(v) {}
29   int a;
30   typedef int type;
31 };
32 
33 template <typename T>
34 class S7 : public T {
35 protected:
36   T a;
S7()37   S7() : a(0) {}
38 
39 public:
S7(typename T::type v)40   S7(typename T::type v) : a(v) {
41 #pragma omp target parallel for private(a) private(this->a) private(T::a)
42     for (int k = 0; k < a.a; ++k)
43       ++this->a.a;
44   }
operator =(S7 & s)45   S7 &operator=(S7 &s) {
46 #pragma omp target parallel for private(a) private(this->a)
47     for (int k = 0; k < s.a.a; ++k)
48       ++s.a.a;
49     return *this;
50   }
51 };
52 
53 // CHECK: #pragma omp target parallel for private(this->a) private(this->a) private(T::a){{$}}
54 // CHECK: #pragma omp target parallel for private(this->a) private(this->a)
55 // CHECK: #pragma omp target parallel for private(this->a) private(this->a) private(this->S::a)
56 
57 class S8 : public S7<S> {
S8()58   S8() {}
59 
60 public:
S8(int v)61   S8(int v) : S7<S>(v){
62 #pragma omp target parallel for private(a) private(this->a) private(S7<S>::a)
63     for (int k = 0; k < a.a; ++k)
64       ++this->a.a;
65   }
operator =(S8 & s)66   S8 &operator=(S8 &s) {
67 #pragma omp target parallel for private(a) private(this->a)
68     for (int k = 0; k < s.a.a; ++k)
69       ++s.a.a;
70     return *this;
71   }
72 };
73 
74 // CHECK: #pragma omp target parallel for private(this->a) private(this->a) private(this->S7<S>::a)
75 // CHECK: #pragma omp target parallel for private(this->a) private(this->a)
76 
77 template <class T, int N>
tmain(T argc,T * argv)78 T tmain(T argc, T *argv) {
79   T b = argc, c, d, e, f, h;
80   T arr[N][10], arr1[N];
81   T i, j;
82   T s;
83   static T a;
84 // CHECK: static T a;
85   static T g;
86 #pragma omp threadprivate(g)
87 #pragma omp target parallel for schedule(dynamic) default(none) linear(a) allocate(a) order(concurrent)
88   // CHECK: #pragma omp target parallel for schedule(dynamic) default(none) linear(a) allocate(a) order(concurrent)
89   for (int i = 0; i < 2; ++i)
90     a = 2;
91 // CHECK-NEXT: for (int i = 0; i < 2; ++i)
92 // CHECK-NEXT: a = 2;
93 #pragma omp target parallel for allocate(b) private(argc, b), firstprivate(c, d), lastprivate(d, f) collapse(N) schedule(static, N) ordered(N) if (parallel :argc) num_threads(N) default(shared) shared(e) reduction(+ : h)
94   for (int i = 0; i < 2; ++i)
95     for (int j = 0; j < 2; ++j)
96       for (int j = 0; j < 2; ++j)
97         for (int j = 0; j < 2; ++j)
98           for (int j = 0; j < 2; ++j)
99   for (int i = 0; i < 2; ++i)
100     for (int j = 0; j < 2; ++j)
101       for (int j = 0; j < 2; ++j)
102         for (int j = 0; j < 2; ++j)
103           for (int j = 0; j < 2; ++j)
104             foo();
105   // CHECK-NEXT: #pragma omp target parallel for allocate(b) private(argc,b) firstprivate(c,d) lastprivate(d,f) collapse(N) schedule(static, N) ordered(N) if(parallel: argc) num_threads(N) default(shared) shared(e) reduction(+: h)
106   // CHECK-NEXT: for (int i = 0; i < 2; ++i)
107   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
108   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
109   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
110   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
111   // CHECK-NEXT: for (int i = 0; i < 2; ++i)
112   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
113   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
114   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
115   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
116   // CHECK-NEXT: foo();
117 #pragma omp target parallel for default(none), private(argc,b) firstprivate(argv) shared (d) if (parallel:argc > 0) num_threads(N) proc_bind(master) reduction(+:c, arr1[argc]) reduction(max:e, arr[:N][0:10])
118   for (int i = 0; i < 2; ++i) {}
119 // CHECK-NEXT: #pragma omp target parallel for default(none) private(argc,b) firstprivate(argv) shared(d) if(parallel: argc > 0) num_threads(N) proc_bind(master) reduction(+: c,arr1[argc]) reduction(max: e,arr[:N][0:10])
120   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
121   // CHECK-NEXT: }
122 #pragma omp target parallel for if (N) num_threads(s) proc_bind(close) reduction(^:e, f, arr[0:N][:argc]) reduction(&& : h)
123 // CHECK-NEXT: #pragma omp target parallel for if(N) num_threads(s) proc_bind(close) reduction(^: e,f,arr[0:N][:argc]) reduction(&&: h)
124   for (int i = 0; i < 2; ++i) {}
125   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
126   // CHECK-NEXT: }
127 #pragma omp target parallel for if (target:argc > 0)
128 // CHECK-NEXT: #pragma omp target parallel for if(target: argc > 0)
129   for (int i = 0; i < 2; ++i) {}
130   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
131   // CHECK-NEXT: }
132 #pragma omp target parallel for if (parallel:argc > 0)
133 // CHECK-NEXT: #pragma omp target parallel for if(parallel: argc > 0)
134   for (int i = 0; i < 2; ++i) {}
135   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
136   // CHECK-NEXT: }
137 #pragma omp target parallel for if (N)
138 // CHECK-NEXT: #pragma omp target parallel for if(N)
139   for (int i = 0; i < 2; ++i) {}
140   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
141   // CHECK-NEXT: }
142 #pragma omp target parallel for map(i)
143 // CHECK-NEXT: #pragma omp target parallel for map(tofrom: i)
144   for (int i = 0; i < 2; ++i) {}
145   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
146   // CHECK-NEXT: }
147 #pragma omp target parallel for map(arr1[0:10], i)
148 // CHECK-NEXT: #pragma omp target parallel for map(tofrom: arr1[0:10],i)
149   for (int i = 0; i < 2; ++i) {}
150   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
151   // CHECK-NEXT: }
152 #pragma omp target parallel for map(to: i) map(from: j)
153 // CHECK-NEXT: #pragma omp target parallel for map(to: i) map(from: j)
154   for (int i = 0; i < 2; ++i) {}
155   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
156   // CHECK-NEXT: }
157 #pragma omp target parallel for map(always,alloc: i)
158 // CHECK-NEXT: #pragma omp target parallel for map(always,alloc: i)
159   for (int i = 0; i < 2; ++i) {}
160   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
161   // CHECK-NEXT: }
162 #pragma omp target parallel for nowait
163 // CHECK-NEXT: #pragma omp target parallel for nowait
164   for (int i = 0; i < 2; ++i) {}
165   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
166   // CHECK-NEXT: }
167 #pragma omp target parallel for depend(in : argc, arr[i:argc], arr1[:])
168 // CHECK-NEXT: #pragma omp target parallel for depend(in : argc,arr[i:argc],arr1[:])
169   for (int i = 0; i < 2; ++i) {}
170   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
171   // CHECK-NEXT: }
172 #pragma omp target parallel for defaultmap(tofrom: scalar)
173 // CHECK-NEXT: #pragma omp target parallel for defaultmap(tofrom: scalar)
174   for (int i = 0; i < 2; ++i) {}
175   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
176   // CHECK-NEXT: }
177 
178   return T();
179 }
180 
main(int argc,char ** argv)181 int main(int argc, char **argv) {
182   int b = argc, c, d, e, f, h;
183   int arr[5][10], arr1[5];
184   int i, j;
185   int s;
186   static int a;
187 // CHECK: static int a;
188   static float g;
189 #pragma omp threadprivate(g)
190 #pragma omp target parallel for schedule(guided, argc) default(none) linear(a) shared(argc)
191   // CHECK: #pragma omp target parallel for schedule(guided, argc) default(none) linear(a) shared(argc)
192   for (int i = 0; i < 2; ++i)
193     a = 2;
194 // CHECK-NEXT: for (int i = 0; i < 2; ++i)
195 // CHECK-NEXT: a = 2;
196 #pragma omp target parallel for private(argc, b), firstprivate(argv, c), lastprivate(d, f) collapse(2) schedule(auto) ordered if (target: argc) num_threads(a) default(shared) shared(e) reduction(+ : h) linear(a:-5)
197   for (int i = 0; i < 10; ++i)
198     for (int j = 0; j < 10; ++j)
199       foo();
200   // CHECK-NEXT: #pragma omp target parallel for private(argc,b) firstprivate(argv,c) lastprivate(d,f) collapse(2) schedule(auto) ordered if(target: argc) num_threads(a) default(shared) shared(e) reduction(+: h) linear(a: -5)
201  // CHECK-NEXT: for (int i = 0; i < 10; ++i)
202   // CHECK-NEXT: for (int j = 0; j < 10; ++j)
203   // CHECK-NEXT: foo();
204 #pragma omp target parallel for default(none), private(argc,b) firstprivate(argv) shared (d) if (parallel:argc > 0) num_threads(5) proc_bind(master) reduction(+:c, arr1[argc]) reduction(max:e, arr[:5][0:10])
205   for (int i = 0; i < 2; ++i) {}
206 // CHECK-NEXT: #pragma omp target parallel for default(none) private(argc,b) firstprivate(argv) shared(d) if(parallel: argc > 0) num_threads(5) proc_bind(master) reduction(+: c,arr1[argc]) reduction(max: e,arr[:5][0:10])
207   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
208   // CHECK-NEXT: }
209 #pragma omp target parallel for if (5) num_threads(s) proc_bind(close) reduction(^:e, f, arr[0:5][:argc]) reduction(&& : h) allocate(omp_const_mem_alloc: h) uses_allocators(omp_const_mem_alloc)
210 // CHECK-NEXT: #pragma omp target parallel for if(5) num_threads(s) proc_bind(close) reduction(^: e,f,arr[0:5][:argc]) reduction(&&: h) allocate(omp_const_mem_alloc: h) uses_allocators(omp_const_mem_alloc)
211   for (int i = 0; i < 2; ++i) {}
212   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
213   // CHECK-NEXT: }
214 #pragma omp target parallel for if (target:argc > 0)
215 // CHECK-NEXT: #pragma omp target parallel for if(target: argc > 0)
216   for (int i = 0; i < 2; ++i) {}
217   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
218   // CHECK-NEXT: }
219 #pragma omp target parallel for if (parallel:argc > 0)
220 // CHECK-NEXT: #pragma omp target parallel for if(parallel: argc > 0)
221   for (int i = 0; i < 2; ++i) {}
222   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
223   // CHECK-NEXT: }
224 #pragma omp target parallel for if (5)
225 // CHECK-NEXT: #pragma omp target parallel for if(5)
226   for (int i = 0; i < 2; ++i) {}
227   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
228   // CHECK-NEXT: }
229 #pragma omp target parallel for map(i)
230 // CHECK-NEXT: #pragma omp target parallel for map(tofrom: i)
231   for (int i = 0; i < 2; ++i) {}
232   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
233   // CHECK-NEXT: }
234 #pragma omp target parallel for map(arr1[0:10], i)
235 // CHECK-NEXT: #pragma omp target parallel for map(tofrom: arr1[0:10],i)
236   for (int i = 0; i < 2; ++i) {}
237   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
238   // CHECK-NEXT: }
239 #pragma omp target parallel for map(to: i) map(from: j)
240 // CHECK-NEXT: #pragma omp target parallel for map(to: i) map(from: j)
241   for (int i = 0; i < 2; ++i) {}
242   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
243   // CHECK-NEXT: }
244 #pragma omp target parallel for map(always,alloc: i)
245 // CHECK-NEXT: #pragma omp target parallel for map(always,alloc: i)
246   for (int i = 0; i < 2; ++i) {}
247   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
248   // CHECK-NEXT: }
249 #pragma omp target parallel for nowait
250 // CHECK-NEXT: #pragma omp target parallel for nowait
251   for (int i = 0; i < 2; ++i) {}
252   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
253   // CHECK-NEXT: }
254 #pragma omp target parallel for depend(in : argc, arr[i:argc], arr1[:])
255 // CHECK-NEXT: #pragma omp target parallel for depend(in : argc,arr[i:argc],arr1[:])
256   for (int i = 0; i < 2; ++i) {}
257   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
258   // CHECK-NEXT: }
259 #pragma omp target parallel for defaultmap(tofrom: scalar) reduction(task, +: argc)
260 // CHECK-NEXT: #pragma omp target parallel for defaultmap(tofrom: scalar) reduction(task, +: argc)
261   for (int i = 0; i < 2; ++i) {}
262   // CHECK-NEXT: for (int i = 0; i < 2; ++i) {
263   // CHECK-NEXT: }
264   return (tmain<int, 5>(argc, &argc) + tmain<char, 1>(argv[0][0], argv[0]));
265 }
266 
267 #endif
268