Clang Project

clang_source_code/test/OpenMP/distribute_parallel_for_simd_ast_print.cpp
1// RUN: %clang_cc1 -verify -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 -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 simd 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    int k;
36#pragma omp target
37#pragma omp teams
38#pragma omp distribute parallel for simd private(a) private(this->a) linear(k)
39    for (k = 0; k < s.a.a; ++k)
40      ++s.a.a;
41    return *this;
42  }
43};
44
45// CHECK: #pragma omp distribute parallel for simd private(this->a) private(this->a) private(T::a){{$}}
46// CHECK: #pragma omp distribute parallel for simd private(this->a) private(this->a) linear(k)
47// CHECK: #pragma omp distribute parallel for simd private(this->a) private(this->a) private(this->S::a)
48
49class S8 : public S7<S> {
50  S8() {}
51
52public:
53  S8(int v) : S7<S>(v){
54#pragma omp target
55#pragma omp teams
56#pragma omp distribute parallel for simd private(a) private(this->a) private(S7<S>::a)
57    for (int k = 0; k < a.a; ++k)
58      ++this->a.a;
59  }
60  S8 &operator=(S8 &s) {
61#pragma omp target
62#pragma omp teams
63#pragma omp distribute parallel for simd private(a) private(this->a)
64    for (int k = 0; k < s.a.a; ++k)
65      ++s.a.a;
66    return *this;
67  }
68};
69
70// CHECK: #pragma omp distribute parallel for simd private(this->a) private(this->a) private(this->S7<S>::a)
71// CHECK: #pragma omp distribute parallel for simd private(this->a) private(this->a)
72
73template <class T, int N>
74T tmain(T argc) {
75  T b = argc, c, d, e, f, h;
76  static T a;
77// CHECK: static T a;
78  static T g;
79#pragma omp threadprivate(g)
80#pragma omp target
81#pragma omp teams
82#pragma omp distribute parallel for simd dist_schedule(static, a) schedule(dynamic) default(none) copyin(g) firstprivate(a) allocate(a)
83  // CHECK: #pragma omp distribute parallel for simd dist_schedule(static, a) schedule(dynamic) default(none) copyin(g) firstprivate(a) allocate(a)
84  for (int i = 0; i < 2; ++i)
85    a = 2;
86// CHECK-NEXT: for (int i = 0; i < 2; ++i)
87// CHECK-NEXT: a = 2;
88#pragma omp target
89#pragma omp teams
90#pragma omp distribute parallel for simd 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)
91  for (int i = 0; i < 2; ++i)
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 j = 0; j < 2; ++j)
96  for (int i = 0; i < 2; ++i)
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          for (int j = 0; j < 2; ++j)
101            a++;
102  // CHECK: #pragma omp distribute parallel for simd 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)
103  // CHECK-NEXT: for (int i = 0; i < 2; ++i)
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 j = 0; j < 2; ++j)
108  // CHECK-NEXT: for (int i = 0; i < 2; ++i)
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: for (int j = 0; j < 2; ++j)
113  // CHECK-NEXT: a++;
114  return T();
115}
116
117int main(int argc, char **argv) {
118  int b = argc, c, d, e, f, h;
119  int x[200];
120  static int a;
121// CHECK: static int a;
122  static float g;
123#pragma omp threadprivate(g)
124#pragma omp target
125#pragma omp teams
126#pragma omp distribute parallel for simd schedule(guided, argc) default(none) copyin(g) dist_schedule(static, a) private(a)
127  // CHECK: #pragma omp distribute parallel for simd schedule(guided, argc) default(none) copyin(g) dist_schedule(static, a) private(a)
128  for (int i = 0; i < 2; ++i)
129    a = 2;
130// CHECK-NEXT: for (int i = 0; i < 2; ++i)
131// CHECK-NEXT: a = 2;
132#pragma omp target
133#pragma omp teams
134#pragma omp distribute parallel for simd 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)
135  for (int i = 0; i < 10; ++i)
136    for (int j = 0; j < 10; ++j)
137      a++;
138  // CHECK: #pragma omp distribute parallel for simd 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  // CHECK-NEXT: for (int i = 0; i < 10; ++i)
140  // CHECK-NEXT: for (int j = 0; j < 10; ++j)
141  // CHECK-NEXT: a++;
142
143  int i;
144#pragma omp target
145#pragma omp teams
146#pragma omp distribute parallel for simd aligned(x:8) linear(i:2) safelen(8) simdlen(8)
147  for (i = 0; i < 100; i++)
148    for (int j = 0; j < 200; j++)
149      a += h + x[j];
150  // CHECK: #pragma omp distribute parallel for simd aligned(x: 8) linear(i: 2) safelen(8) simdlen(8)
151  // CHECK-NEXT: for (i = 0; i < 100; i++)
152  // CHECK-NEXT: for (int j = 0; j < 200; j++)
153  // CHECK-NEXT: a += h + x[j];
154
155  return (tmain<int, 5>(argc) + tmain<char, 1>(argv[0][0]));
156}
157
158#endif
159