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 
13 struct S {
14   S(): a(0) {}
15   S(int v) : a(v) {}
16   int a;
17   typedef int type;
18 };
19 
20 template <typename T>
21 class S7 : public T {
22 protected:
23   T a;
24   S7() : a(0) {}
25 
26 public:
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 
49 class S8 : public S7<S> {
50   S8() {}
51 
52 public:
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 
73 template <class T, int N>
74 T 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)
83   // CHECK: #pragma omp distribute parallel for simd dist_schedule(static, a) schedule(dynamic) default(none) copyin(g)
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 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 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 
117 int 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