1 // RUN: %clang_cc1 -verify -fopenmp -ast-print %s | FileCheck %s
2 // RUN: %clang_cc1 -fopenmp -x c++ -std=c++11 -emit-pch -o %t %s
3 // RUN: %clang_cc1 -fopenmp -std=c++11 -include-pch %t -fsyntax-only -verify %s -ast-print | FileCheck %s
4 // expected-no-diagnostics
5 
6 #ifndef HEADER
7 #define HEADER
8 
9 template <typename T, int C>
10 T tmain(T argc, T *argv) {
11   T i, j, b, c, d, e, x[20];
12 
13   i = argc;
14 #pragma omp target enter data map(to: i)
15 
16 #pragma omp target enter data map(to: i) if (target enter data: j > 0)
17 
18 #pragma omp target enter data map(to: i) if (b)
19 
20 #pragma omp target enter data map(to: c)
21 
22 #pragma omp target enter data map(to: c) if(b>e)
23 
24 #pragma omp target enter data map(alloc: x[0:10], c)
25 
26 #pragma omp target enter data map(to: c) map(alloc: d)
27 
28 #pragma omp target enter data map(always,alloc: e)
29 
30 #pragma omp target enter data nowait map(to: i)
31 
32 #pragma omp target enter data nowait map(to: i) if (target enter data: j > 0)
33 
34 #pragma omp target enter data map(to: i) if (b) nowait
35 
36 #pragma omp target enter data map(to: c) nowait
37 
38 #pragma omp target enter data map(to: c) nowait if(b>e)
39 
40 #pragma omp target enter data nowait map(alloc: x[0:10], c)
41 
42 #pragma omp target enter data nowait map(to: c) map(alloc: d)
43 
44 #pragma omp target enter data nowait map(always,alloc: e)
45 
46 #pragma omp target enter data nowait depend(in : argc, argv[i:argc], x[:]) map(to: i)
47 
48 #pragma omp target enter data nowait map(to: i) if (target enter data: j > 0) depend(in : argc, argv[i:argc], x[:])
49 
50 #pragma omp target enter data depend(in : argc, argv[i:argc], x[:]) map(to: i) if (b) nowait
51 
52 #pragma omp target enter data map(to: c) depend(in : argc, argv[i:argc], x[:]) nowait
53 
54 #pragma omp target enter data map(to: c) nowait if(b>e) depend(in : argc, argv[i:argc], x[:])
55 
56 #pragma omp target enter data nowait map(alloc: x[0:10], c) depend(in : argc, argv[i:argc], x[:])
57 
58 #pragma omp target enter data nowait depend(in : argc, argv[i:argc], x[:]) map(to: c) map(alloc: d)
59 
60 #pragma omp target enter data nowait map(always,alloc: e) depend(in : argc, argv[i:argc], x[:])
61 
62   return 0;
63 }
64 
65 // CHECK: template <typename T = int, int C = 5> int tmain(int argc, int *argv) {
66 // CHECK-NEXT: int i, j, b, c, d, e, x[20];
67 // CHECK-NEXT: i = argc;
68 // CHECK-NEXT: #pragma omp target enter data map(to: i)
69 // CHECK-NEXT: #pragma omp target enter data map(to: i) if(target enter data: j > 0)
70 // CHECK-NEXT: #pragma omp target enter data map(to: i) if(b)
71 // CHECK-NEXT: #pragma omp target enter data map(to: c)
72 // CHECK-NEXT: #pragma omp target enter data map(to: c) if(b > e)
73 // CHECK-NEXT: #pragma omp target enter data map(alloc: x[0:10],c)
74 // CHECK-NEXT: #pragma omp target enter data map(to: c) map(alloc: d)
75 // CHECK-NEXT: #pragma omp target enter data map(always,alloc: e)
76 // CHECK-NEXT: #pragma omp target enter data nowait map(to: i)
77 // CHECK-NEXT: #pragma omp target enter data nowait map(to: i) if(target enter data: j > 0)
78 // CHECK-NEXT: #pragma omp target enter data map(to: i) if(b) nowait
79 // CHECK-NEXT: #pragma omp target enter data map(to: c) nowait
80 // CHECK-NEXT: #pragma omp target enter data map(to: c) nowait if(b > e)
81 // CHECK-NEXT: #pragma omp target enter data nowait map(alloc: x[0:10],c)
82 // CHECK-NEXT: #pragma omp target enter data nowait map(to: c) map(alloc: d)
83 // CHECK-NEXT: #pragma omp target enter data nowait map(always,alloc: e)
84 // CHECK-NEXT: #pragma omp target enter data nowait depend(in : argc,argv[i:argc],x[:]) map(to: i)
85 // CHECK-NEXT: #pragma omp target enter data nowait map(to: i) if(target enter data: j > 0) depend(in : argc,argv[i:argc],x[:])
86 // CHECK-NEXT: #pragma omp target enter data depend(in : argc,argv[i:argc],x[:]) map(to: i) if(b) nowait
87 // CHECK-NEXT: #pragma omp target enter data map(to: c) depend(in : argc,argv[i:argc],x[:]) nowait
88 // CHECK-NEXT: #pragma omp target enter data map(to: c) nowait if(b > e) depend(in : argc,argv[i:argc],x[:])
89 // CHECK-NEXT: #pragma omp target enter data nowait map(alloc: x[0:10],c) depend(in : argc,argv[i:argc],x[:])
90 // CHECK-NEXT: #pragma omp target enter data nowait depend(in : argc,argv[i:argc],x[:]) map(to: c) map(alloc: d)
91 // CHECK-NEXT: #pragma omp target enter data nowait map(always,alloc: e) depend(in : argc,argv[i:argc],x[:])
92 // CHECK: template <typename T = char, int C = 1> char tmain(char argc, char *argv) {
93 // CHECK-NEXT: char i, j, b, c, d, e, x[20];
94 // CHECK-NEXT: i = argc;
95 // CHECK-NEXT: #pragma omp target enter data map(to: i)
96 // CHECK-NEXT: #pragma omp target enter data map(to: i) if(target enter data: j > 0)
97 // CHECK-NEXT: #pragma omp target enter data map(to: i) if(b)
98 // CHECK-NEXT: #pragma omp target enter data map(to: c)
99 // CHECK-NEXT: #pragma omp target enter data map(to: c) if(b > e)
100 // CHECK-NEXT: #pragma omp target enter data map(alloc: x[0:10],c)
101 // CHECK-NEXT: #pragma omp target enter data map(to: c) map(alloc: d)
102 // CHECK-NEXT: #pragma omp target enter data map(always,alloc: e)
103 // CHECK-NEXT: #pragma omp target enter data nowait map(to: i)
104 // CHECK-NEXT: #pragma omp target enter data nowait map(to: i) if(target enter data: j > 0)
105 // CHECK-NEXT: #pragma omp target enter data map(to: i) if(b) nowait
106 // CHECK-NEXT: #pragma omp target enter data map(to: c) nowait
107 // CHECK-NEXT: #pragma omp target enter data map(to: c) nowait if(b > e)
108 // CHECK-NEXT: #pragma omp target enter data nowait map(alloc: x[0:10],c)
109 // CHECK-NEXT: #pragma omp target enter data nowait map(to: c) map(alloc: d)
110 // CHECK-NEXT: #pragma omp target enter data nowait map(always,alloc: e)
111 // CHECK-NEXT: #pragma omp target enter data nowait depend(in : argc,argv[i:argc],x[:]) map(to: i)
112 // CHECK-NEXT: #pragma omp target enter data nowait map(to: i) if(target enter data: j > 0) depend(in : argc,argv[i:argc],x[:])
113 // CHECK-NEXT: #pragma omp target enter data depend(in : argc,argv[i:argc],x[:]) map(to: i) if(b) nowait
114 // CHECK-NEXT: #pragma omp target enter data map(to: c) depend(in : argc,argv[i:argc],x[:]) nowait
115 // CHECK-NEXT: #pragma omp target enter data map(to: c) nowait if(b > e) depend(in : argc,argv[i:argc],x[:])
116 // CHECK-NEXT: #pragma omp target enter data nowait map(alloc: x[0:10],c) depend(in : argc,argv[i:argc],x[:])
117 // CHECK-NEXT: #pragma omp target enter data nowait depend(in : argc,argv[i:argc],x[:]) map(to: c) map(alloc: d)
118 // CHECK-NEXT: #pragma omp target enter data nowait map(always,alloc: e) depend(in : argc,argv[i:argc],x[:])
119 // CHECK: template <typename T, int C> T tmain(T argc, T *argv) {
120 // CHECK-NEXT: T i, j, b, c, d, e, x[20];
121 // CHECK-NEXT: i = argc;
122 // CHECK-NEXT: #pragma omp target enter data map(to: i)
123 // CHECK-NEXT: #pragma omp target enter data map(to: i) if(target enter data: j > 0)
124 // CHECK-NEXT: #pragma omp target enter data map(to: i) if(b)
125 // CHECK-NEXT: #pragma omp target enter data map(to: c)
126 // CHECK-NEXT: #pragma omp target enter data map(to: c) if(b > e)
127 // CHECK-NEXT: #pragma omp target enter data map(alloc: x[0:10],c)
128 // CHECK-NEXT: #pragma omp target enter data map(to: c) map(alloc: d)
129 // CHECK-NEXT: #pragma omp target enter data map(always,alloc: e)
130 // CHECK-NEXT: #pragma omp target enter data nowait map(to: i)
131 // CHECK-NEXT: #pragma omp target enter data nowait map(to: i) if(target enter data: j > 0)
132 // CHECK-NEXT: #pragma omp target enter data map(to: i) if(b) nowait
133 // CHECK-NEXT: #pragma omp target enter data map(to: c) nowait
134 // CHECK-NEXT: #pragma omp target enter data map(to: c) nowait if(b > e)
135 // CHECK-NEXT: #pragma omp target enter data nowait map(alloc: x[0:10],c)
136 // CHECK-NEXT: #pragma omp target enter data nowait map(to: c) map(alloc: d)
137 // CHECK-NEXT: #pragma omp target enter data nowait map(always,alloc: e)
138 // CHECK-NEXT: #pragma omp target enter data nowait depend(in : argc,argv[i:argc],x[:]) map(to: i)
139 // CHECK-NEXT: #pragma omp target enter data nowait map(to: i) if(target enter data: j > 0) depend(in : argc,argv[i:argc],x[:])
140 // CHECK-NEXT: #pragma omp target enter data depend(in : argc,argv[i:argc],x[:]) map(to: i) if(b) nowait
141 // CHECK-NEXT: #pragma omp target enter data map(to: c) depend(in : argc,argv[i:argc],x[:]) nowait
142 // CHECK-NEXT: #pragma omp target enter data map(to: c) nowait if(b > e) depend(in : argc,argv[i:argc],x[:])
143 // CHECK-NEXT: #pragma omp target enter data nowait map(alloc: x[0:10],c) depend(in : argc,argv[i:argc],x[:])
144 // CHECK-NEXT: #pragma omp target enter data nowait depend(in : argc,argv[i:argc],x[:]) map(to: c) map(alloc: d)
145 // CHECK-NEXT: #pragma omp target enter data nowait map(always,alloc: e) depend(in : argc,argv[i:argc],x[:])
146 
147 int main (int argc, char **argv) {
148   int b = argc, i, c, d, e, f, g, x[20];
149   static int a;
150 // CHECK: static int a;
151 
152 #pragma omp target enter data map(to: a)
153 // CHECK:      #pragma omp target enter data map(to: a)
154   a=2;
155 // CHECK-NEXT: a = 2;
156 #pragma omp target enter data map(to: a) if (target enter data: b)
157 // CHECK: #pragma omp target enter data map(to: a) if(target enter data: b)
158 
159 #pragma omp target enter data map(to: a) if (b > g)
160 // CHECK: #pragma omp target enter data map(to: a) if(b > g)
161 
162 #pragma omp target enter data map(to: c)
163 // CHECK-NEXT: #pragma omp target enter data map(to: c)
164 
165 #pragma omp target enter data map(alloc: c) if(b>g)
166 // CHECK-NEXT: #pragma omp target enter data map(alloc: c) if(b > g)
167 
168 #pragma omp target enter data map(to: x[0:10], c)
169 // CHECK-NEXT: #pragma omp target enter data map(to: x[0:10],c)
170 
171 #pragma omp target enter data map(to: c) map(alloc: d)
172 // CHECK-NEXT: #pragma omp target enter data map(to: c) map(alloc: d)
173 
174 #pragma omp target enter data map(always,alloc: e)
175 // CHECK-NEXT: #pragma omp target enter data map(always,alloc: e)
176 
177 #pragma omp target enter data nowait map(to: a)
178 // CHECK:      #pragma omp target enter data nowait map(to: a)
179 
180 #pragma omp target enter data nowait map(to: a) if (target enter data: b)
181 // CHECK: #pragma omp target enter data nowait map(to: a) if(target enter data: b)
182 
183 #pragma omp target enter data map(to: a) if (b > g) nowait
184 // CHECK: #pragma omp target enter data map(to: a) if(b > g) nowait
185 
186 #pragma omp target enter data map(to: c) nowait
187 // CHECK-NEXT: #pragma omp target enter data map(to: c) nowait
188 
189 #pragma omp target enter data map(alloc: c) nowait if(b>g)
190 // CHECK-NEXT: #pragma omp target enter data map(alloc: c) nowait if(b > g)
191 
192 #pragma omp target enter data nowait map(to: x[0:10], c)
193 // CHECK-NEXT: #pragma omp target enter data nowait map(to: x[0:10],c)
194 
195 #pragma omp target enter data nowait map(to: c) map(alloc: d)
196 // CHECK-NEXT: #pragma omp target enter data nowait map(to: c) map(alloc: d)
197 
198 #pragma omp target enter data nowait map(always,alloc: e)
199 // CHECK-NEXT: #pragma omp target enter data nowait map(always,alloc: e)
200 
201 #pragma omp target enter data depend(in : argc, argv[i:argc], x[:]) nowait map(to: a)
202 // CHECK:      #pragma omp target enter data depend(in : argc,argv[i:argc],x[:]) nowait map(to: a)
203 
204 #pragma omp target enter data nowait depend(in : argc, argv[i:argc], x[:]) map(to: a) if (target enter data: b)
205 // CHECK: #pragma omp target enter data nowait depend(in : argc,argv[i:argc],x[:]) map(to: a) if(target enter data: b)
206 
207 #pragma omp target enter data map(to: a) depend(in : argc, argv[i:argc], x[:]) if (b > g) nowait
208 // CHECK: #pragma omp target enter data map(to: a) depend(in : argc,argv[i:argc],x[:]) if(b > g) nowait
209 
210 #pragma omp target enter data map(to: c) nowait depend(in : argc, argv[i:argc], x[:])
211 // CHECK-NEXT: #pragma omp target enter data map(to: c) nowait depend(in : argc,argv[i:argc],x[:])
212 
213 #pragma omp target enter data depend(in : argc, argv[i:argc], x[:]) map(alloc: c) nowait if(b>g)
214 // CHECK-NEXT: #pragma omp target enter data depend(in : argc,argv[i:argc],x[:]) map(alloc: c) nowait if(b > g)
215 
216 #pragma omp target enter data nowait map(to: x[0:10], c) depend(in : argc, argv[i:argc], x[:])
217 // CHECK-NEXT: #pragma omp target enter data nowait map(to: x[0:10],c) depend(in : argc,argv[i:argc],x[:])
218 
219 #pragma omp target enter data nowait map(to: c) depend(in : argc, argv[i:argc], x[:]) map(alloc: d)
220 // CHECK-NEXT: #pragma omp target enter data nowait map(to: c) depend(in : argc,argv[i:argc],x[:]) map(alloc: d)
221 
222 #pragma omp target enter data nowait map(always,alloc: e) depend(in : argc, argv[i:argc], x[:])
223 // CHECK-NEXT: #pragma omp target enter data nowait map(always,alloc: e) depend(in : argc,argv[i:argc],x[:])
224 
225   return tmain<int, 5>(argc, &argc) + tmain<char, 1>(argv[0][0], argv[0]);
226 }
227 
228 #endif
229