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 9template <typename T, int C> 10T 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 147int 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