xref: /llvm-project/clang/test/OpenMP/distribute_parallel_for_ast_print.cpp (revision 978e0839ae2feb5ddda3e4e0b5a7ddba1727d2d8) 
1 // RUN: %clang_cc1 -verify -std=c++11 -fopenmp -fopenmp-version=45 -ast-print %s -Wno-openmp-mapping | FileCheck %s --check-prefix=CHECK --check-prefix=OMP45
2 // RUN: %clang_cc1 -fopenmp -fopenmp-version=45 -x c++ -std=c++11 -emit-pch -o %t %s
3 // RUN: %clang_cc1 -fopenmp -fopenmp-version=45 -std=c++11 -include-pch %t -verify %s -ast-print -Wno-openmp-mapping | FileCheck %s --check-prefix=CHECK --check-prefix=OMP45
4 // RUN: %clang_cc1 -verify -std=c++11 -fopenmp -ast-print %s -Wno-openmp-mapping -DOMP5 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP50
5 // RUN: %clang_cc1 -fopenmp -x c++ -std=c++11 -emit-pch -o %t %s -DOMP5
6 // RUN: %clang_cc1 -fopenmp -std=c++11 -include-pch %t -verify %s -ast-print -Wno-openmp-mapping -DOMP5 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP50
7 // RUN: %clang_cc1 -verify -std=c++11 -fopenmp -fopenmp-version=51 -ast-print %s -Wno-openmp-mapping -DOMP51 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP51
8 // RUN: %clang_cc1 -fopenmp -fopenmp-version=51 -x c++ -std=c++11 -emit-pch -o %t %s -DOMP51
9 // RUN: %clang_cc1 -fopenmp -fopenmp-version=51 -std=c++11 -include-pch %t -verify %s -ast-print -Wno-openmp-mapping -DOMP51 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP51
10 // RUN: %clang_cc1 -verify -std=c++11 -fopenmp -fopenmp-version=60 -ast-print %s -Wno-openmp-mapping -DOMP51 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP51
11 // RUN: %clang_cc1 -fopenmp -fopenmp-version=60 -x c++ -std=c++11 -emit-pch -o %t %s -DOMP51
12 // RUN: %clang_cc1 -fopenmp -fopenmp-version=60 -std=c++11 -include-pch %t -verify %s -ast-print -Wno-openmp-mapping -DOMP51 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP51
13 
14 // RUN: %clang_cc1 -verify -std=c++11 -fopenmp-simd -fopenmp-version=45 -ast-print %s -Wno-openmp-mapping | FileCheck %s --check-prefix=CHECK --check-prefix=OMP45
15 // RUN: %clang_cc1 -fopenmp-simd -fopenmp-version=45 -x c++ -std=c++11 -emit-pch -o %t %s
16 // RUN: %clang_cc1 -fopenmp-simd -fopenmp-version=45 -std=c++11 -include-pch %t -verify %s -ast-print -Wno-openmp-mapping | FileCheck %s --check-prefix=CHECK --check-prefix=OMP45
17 // RUN: %clang_cc1 -verify -std=c++11 -fopenmp-simd -ast-print %s -Wno-openmp-mapping -DOMP5 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP50
18 // RUN: %clang_cc1 -fopenmp-simd -x c++ -std=c++11 -emit-pch -o %t %s -DOMP5
19 // RUN: %clang_cc1 -fopenmp-simd -std=c++11 -include-pch %t -verify %s -ast-print -Wno-openmp-mapping -DOMP5 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP50
20 // RUN: %clang_cc1 -verify -std=c++11 -fopenmp-simd -fopenmp-version=51 -ast-print %s -Wno-openmp-mapping -DOMP51 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP51
21 // RUN: %clang_cc1 -fopenmp-simd -fopenmp-version=51 -x c++ -std=c++11 -emit-pch -o %t %s -DOMP51
22 // RUN: %clang_cc1 -fopenmp-simd -fopenmp-version=51 -std=c++11 -include-pch %t -verify %s -ast-print -Wno-openmp-mapping -DOMP51 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP51
23 // RUN: %clang_cc1 -verify -std=c++11 -fopenmp-simd -fopenmp-version=60 -ast-print %s -Wno-openmp-mapping -DOMP51 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP51
24 // RUN: %clang_cc1 -fopenmp-simd -fopenmp-version=60 -x c++ -std=c++11 -emit-pch -o %t %s -DOMP51
25 // RUN: %clang_cc1 -fopenmp-simd -fopenmp-version=60 -std=c++11 -include-pch %t -verify %s -ast-print -Wno-openmp-mapping -DOMP51 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP51
26 // expected-no-diagnostics
27 
28 #ifndef HEADER
29 #define HEADER
30 
31 struct S {
32   S(): a(0) {}
33   S(int v) : a(v) {}
34   int a;
35   typedef int type;
36 };
37 
38 template <typename T>
39 class S7 : public T {
40 protected:
41   T a;
42   S7() : a(0) {}
43 
44 public:
45   S7(typename T::type v) : a(v) {
46 #pragma omp target
47 #pragma omp teams
48 #pragma omp distribute parallel for private(a) private(this->a) private(T::a)
49     for (int k = 0; k < a.a; ++k)
50       ++this->a.a;
51   }
52   S7 &operator=(S7 &s) {
53 #pragma omp target
54 #pragma omp teams
55 #pragma omp distribute parallel for private(a) private(this->a)
56     for (int k = 0; k < s.a.a; ++k)
57       ++s.a.a;
58     return *this;
59   }
60 };
61 
62 // CHECK: #pragma omp distribute parallel for private(this->a) private(this->a) private(T::a){{$}}
63 // CHECK: #pragma omp distribute parallel for private(this->a) private(this->a)
64 // CHECK: #pragma omp distribute parallel for private(this->a) private(this->a) private(this->S::a)
65 
66 class S8 : public S7<S> {
67   S8() {}
68 
69 public:
70   S8(int v) : S7<S>(v){
71 #pragma omp target
72 #pragma omp teams
73 #pragma omp distribute parallel for private(a) private(this->a) private(S7<S>::a)
74     for (int k = 0; k < a.a; ++k)
75       ++this->a.a;
76   }
77   S8 &operator=(S8 &s) {
78 #pragma omp target
79 #pragma omp teams
80 #pragma omp distribute parallel for private(a) private(this->a)
81     for (int k = 0; k < s.a.a; ++k)
82       ++s.a.a;
83     return *this;
84   }
85 };
86 
87 // CHECK: #pragma omp distribute parallel for private(this->a) private(this->a) private(this->S7<S>::a)
88 // CHECK: #pragma omp distribute parallel for private(this->a) private(this->a)
89 
90 template <class T, int N>
91 T tmain(T argc) {
92   T b = argc, c, d, e, f, h;
93   static T a;
94 // CHECK: static T a;
95   static T g;
96 #pragma omp threadprivate(g)
97 #pragma omp target
98 #pragma omp teams
99 #pragma omp distribute parallel for dist_schedule(static, a) schedule(dynamic) default(none) copyin(g) firstprivate(a) allocate(a)
100   // CHECK: #pragma omp distribute parallel for dist_schedule(static, a) schedule(dynamic) default(none) copyin(g) firstprivate(a) allocate(a)
101   for (int i = 0; i < 2; ++i)
102     a = 2;
103 // CHECK-NEXT: for (int i = 0; i < 2; ++i)
104 // CHECK-NEXT: a = 2;
105 #pragma omp target
106 #pragma omp teams
107 #pragma omp distribute parallel for allocate(argc) private(argc, b), firstprivate(c, d), lastprivate(f) collapse(N) schedule(static, N) if (parallel :argc) num_threads(N) default(shared) shared(e) reduction(+ : h) dist_schedule(static,N)
108   for (int i = 0; i < 2; ++i)
109     for (int j = 0; j < 2; ++j)
110       for (int j = 0; j < 2; ++j)
111         for (int j = 0; j < 2; ++j)
112           for (int j = 0; j < 2; ++j)
113   for (int i = 0; i < 2; ++i)
114     for (int j = 0; j < 2; ++j)
115       for (int j = 0; j < 2; ++j)
116         for (int j = 0; j < 2; ++j)
117           for (int j = 0; j < 2; ++j)
118             a++;
119   // CHECK: #pragma omp distribute parallel for allocate(argc) private(argc,b) firstprivate(c,d) lastprivate(f) collapse(N) schedule(static, N) if(parallel: argc) num_threads(N) default(shared) shared(e) reduction(+: h) dist_schedule(static, N)
120   // CHECK-NEXT: for (int i = 0; i < 2; ++i)
121   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
122   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
123   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
124   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
125   // CHECK-NEXT: for (int i = 0; i < 2; ++i)
126   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
127   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
128   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
129   // CHECK-NEXT: for (int j = 0; j < 2; ++j)
130   // CHECK-NEXT: a++;
131   return T();
132 }
133 
134 void foo(int argc, char **argv) {
135   int b, c, d, e, f, h;
136   static int a;
137 // CHECK: static int a;
138   static float g;
139 #pragma omp threadprivate(g)
140   [&]() {
141 #pragma omp target
142 #pragma omp teams
143 #pragma omp distribute parallel for schedule(guided, argc) default(none) copyin(g) dist_schedule(static, a) private(a) shared(argc)
144     // CHECK: #pragma omp distribute parallel for schedule(guided, argc) default(none) copyin(g) dist_schedule(static, a) private(a) shared(argc)
145     for (int i = 0; i < 2; ++i)
146       // CHECK: for (int i = 0; i < 2; ++i)
147       [&]() {
148         a = 2;
149         // CHECK: a = 2;
150       }();
151 
152   }();
153   [&]() {
154 #pragma omp target
155 #pragma omp teams
156 #pragma omp distribute parallel for private(argc, b), firstprivate(argv, c), lastprivate(d, f) collapse(2) schedule(auto) if (argc) num_threads(a) default(shared) shared(e) reduction(+ : h) dist_schedule(static, b)
157     for (int i = 0; i < 10; ++i)
158       for (int j = 0; j < 10; ++j)
159         [&]() {
160           a++;
161         }();
162     // CHECK: #pragma omp distribute parallel for private(argc,b) firstprivate(argv,c) lastprivate(d,f) collapse(2) schedule(auto) if(argc) num_threads(a) default(shared) shared(e) reduction(+: h) dist_schedule(static, b)
163     // CHECK-NEXT: for (int i = 0; i < 10; ++i)
164     // CHECK-NEXT: for (int j = 0; j < 10; ++j)
165     // CHECK: a++;
166   }();
167 }
168 
169 int main(int argc, char **argv) {
170   int b = argc, c, d, e, f, h;
171   static int a;
172 // CHECK: static int a;
173   static float g;
174 #pragma omp threadprivate(g)
175 #pragma omp target
176 #pragma omp teams
177 #ifdef OMP51
178 #pragma omp distribute parallel for schedule(guided, argc) default(none) copyin(g) dist_schedule(static, a) private(a) shared(argc) order(reproducible:concurrent) reduction(task,+:c)
179 #elif OMP5
180 #pragma omp distribute parallel for schedule(guided, argc) default(none) copyin(g) dist_schedule(static, a) private(a) shared(argc) order(concurrent) reduction(task,+:c)
181 #else
182 #pragma omp distribute parallel for schedule(guided, argc) default(none) copyin(g) dist_schedule(static, a) private(a) shared(argc)
183 #endif // OMP5
184   // OMP51: #pragma omp distribute parallel for schedule(guided, argc) default(none) copyin(g) dist_schedule(static, a) private(a) shared(argc) order(reproducible: concurrent) reduction(task, +: c)
185   // OMP50: #pragma omp distribute parallel for schedule(guided, argc) default(none) copyin(g) dist_schedule(static, a) private(a) shared(argc) order(concurrent) reduction(task, +: c)
186   // OMP45: #pragma omp distribute parallel for schedule(guided, argc) default(none) copyin(g) dist_schedule(static, a) private(a) shared(argc)
187   for (int i = 0; i < 2; ++i)
188     a = 2;
189 // CHECK-NEXT: for (int i = 0; i < 2; ++i)
190 // CHECK-NEXT: a = 2;
191 #pragma omp target
192 #pragma omp teams
193 #pragma omp distribute parallel for private(argc, b), firstprivate(argv, c), lastprivate(d, f) collapse(2) schedule(auto) if (argc) num_threads(a) default(shared) shared(e) reduction(+ : h) dist_schedule(static, b)
194   for (int i = 0; i < 10; ++i)
195     for (int j = 0; j < 10; ++j)
196       a++;
197   // CHECK: #pragma omp distribute parallel for private(argc,b) firstprivate(argv,c) lastprivate(d,f) collapse(2) schedule(auto) if(argc) num_threads(a) default(shared) shared(e) reduction(+: h) dist_schedule(static, b)
198  // CHECK-NEXT: for (int i = 0; i < 10; ++i)
199   // CHECK-NEXT: for (int j = 0; j < 10; ++j)
200   // CHECK-NEXT: a++;
201   return (tmain<int, 5>(argc) + tmain<char, 1>(argv[0][0]));
202 }
203 
204 #endif
205