Clang Project

clang_source_code/test/OpenMP/distribute_parallel_for_ast_print.cpp
1// RUN: %clang_cc1 -verify -std=c++11 -fopenmp -fopenmp-version=45 -ast-print %s -Wno-openmp-target | FileCheck %s
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 -fsyntax-only -verify %s -ast-print -Wno-openmp-target | FileCheck %s
4
5// RUN: %clang_cc1 -verify -std=c++11 -fopenmp-simd -fopenmp-version=45 -ast-print %s -Wno-openmp-target | FileCheck %s
6// RUN: %clang_cc1 -fopenmp-simd -fopenmp-version=45 -x c++ -std=c++11 -emit-pch -o %t %s
7// RUN: %clang_cc1 -fopenmp-simd -fopenmp-version=45 -std=c++11 -include-pch %t -fsyntax-only -verify %s -ast-print -Wno-openmp-target | FileCheck %s
8// expected-no-diagnostics
9
10#ifndef HEADER
11#define HEADER
12
13struct S {
14  S(): a(0) {}
15  S(int v) : a(v) {}
16  int a;
17  typedef int type;
18};
19
20template <typename T>
21class S7 : public T {
22protected:
23  T a;
24  S7() : a(0) {}
25
26public:
27  S7(typename T::type v) : a(v) {
28#pragma omp target
29#pragma omp teams
30#pragma omp distribute parallel for private(a) private(this->a) private(T::a)
31    for (int k = 0; k < a.a; ++k)
32      ++this->a.a;
33  }
34  S7 &operator=(S7 &s) {
35#pragma omp target
36#pragma omp teams
37#pragma omp distribute parallel for private(a) private(this->a)
38    for (int k = 0; k < s.a.a; ++k)
39      ++s.a.a;
40    return *this;
41  }
42};
43
44// CHECK: #pragma omp distribute parallel for private(this->a) private(this->a) private(T::a){{$}}
45// CHECK: #pragma omp distribute parallel for private(this->a) private(this->a)
46// CHECK: #pragma omp distribute parallel for private(this->a) private(this->a) private(this->S::a)
47
48class S8 : public S7<S> {
49  S8() {}
50
51public:
52  S8(int v) : S7<S>(v){
53#pragma omp target
54#pragma omp teams
55#pragma omp distribute parallel for private(a) private(this->a) private(S7<S>::a)
56    for (int k = 0; k < a.a; ++k)
57      ++this->a.a;
58  }
59  S8 &operator=(S8 &s) {
60#pragma omp target
61#pragma omp teams
62#pragma omp distribute parallel for private(a) private(this->a)
63    for (int k = 0; k < s.a.a; ++k)
64      ++s.a.a;
65    return *this;
66  }
67};
68
69// CHECK: #pragma omp distribute parallel for private(this->a) private(this->a) private(this->S7<S>::a)
70// CHECK: #pragma omp distribute parallel for private(this->a) private(this->a)
71
72template <class T, int N>
73T tmain(T argc) {
74  T b = argc, c, d, e, f, h;
75  static T a;
76// CHECK: static T a;
77  static T g;
78#pragma omp threadprivate(g)
79#pragma omp target
80#pragma omp teams
81#pragma omp distribute parallel for dist_schedule(static, a) schedule(dynamic) default(none) copyin(g) firstprivate(a) allocate(a)
82  // CHECK: #pragma omp distribute parallel for dist_schedule(static, a) schedule(dynamic) default(none) copyin(g) firstprivate(a) allocate(a)
83  for (int i = 0; i < 2; ++i)
84    a = 2;
85// CHECK-NEXT: for (int i = 0; i < 2; ++i)
86// CHECK-NEXT: a = 2;
87#pragma omp target
88#pragma omp teams
89#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)
90  for (int i = 0; i < 2; ++i)
91    for (int j = 0; j < 2; ++j)
92      for (int j = 0; j < 2; ++j)
93        for (int j = 0; j < 2; ++j)
94          for (int j = 0; j < 2; ++j)
95  for (int i = 0; i < 2; ++i)
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 j = 0; j < 2; ++j)
100            a++;
101  // 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)
102  // CHECK-NEXT: for (int i = 0; i < 2; ++i)
103  // CHECK-NEXT: for (int j = 0; j < 2; ++j)
104  // CHECK-NEXT: for (int j = 0; j < 2; ++j)
105  // CHECK-NEXT: for (int j = 0; j < 2; ++j)
106  // CHECK-NEXT: for (int j = 0; j < 2; ++j)
107  // CHECK-NEXT: for (int i = 0; i < 2; ++i)
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 j = 0; j < 2; ++j)
112  // CHECK-NEXT: a++;
113  return T();
114}
115
116void foo(int argc, char **argv) {
117  int b, c, d, e, f, h;
118  static int a;
119// CHECK: static int a;
120  static float g;
121#pragma omp threadprivate(g)
122  [&]() {
123#pragma omp target
124#pragma omp teams
125#pragma omp distribute parallel for schedule(guided, argc) default(none) copyin(g) dist_schedule(static, a) private(a)
126    // CHECK: #pragma omp distribute parallel for schedule(guided, argc) default(none) copyin(g) dist_schedule(static, a) private(a)
127    for (int i = 0; i < 2; ++i)
128// CHECK: for (int i = 0; i < 2; ++i)
129      [&]() {
130   a = 2;
131   // CHECK: a = 2;
132 }();
133
134  }();
135  [&]() {
136#pragma omp target
137#pragma omp teams
138#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)
139    for (int i = 0; i < 10; ++i)
140      for (int j = 0; j < 10; ++j)
141 [&]() {
142   a++;
143 }();
144    // 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)
145    // CHECK-NEXT: for (int i = 0; i < 10; ++i)
146    // CHECK-NEXT: for (int j = 0; j < 10; ++j)
147    // CHECK: a++;
148  }();
149}
150
151int main(int argc, char **argv) {
152  int b = argc, c, d, e, f, h;
153  static int a;
154// CHECK: static int a;
155  static float g;
156#pragma omp threadprivate(g)
157#pragma omp target
158#pragma omp teams
159#pragma omp distribute parallel for schedule(guided, argc) default(none) copyin(g) dist_schedule(static, a) private(a)
160  // CHECK: #pragma omp distribute parallel for schedule(guided, argc) default(none) copyin(g) dist_schedule(static, a) private(a)
161  for (int i = 0; i < 2; ++i)
162    a = 2;
163// CHECK-NEXT: for (int i = 0; i < 2; ++i)
164// CHECK-NEXT: a = 2;
165#pragma omp target
166#pragma omp teams
167#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)
168  for (int i = 0; i < 10; ++i)
169    for (int j = 0; j < 10; ++j)
170      a++;
171  // 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)
172 // CHECK-NEXT: for (int i = 0; i < 10; ++i)
173  // CHECK-NEXT: for (int j = 0; j < 10; ++j)
174  // CHECK-NEXT: a++;
175  return (tmain<int, 5>(argc) + tmain<char, 1>(argv[0][0]));
176}
177
178#endif
179
CodeThinker, Enjoy your reading code