222 lines · cpp
1// RUN: %clang_cc1 -verify -fopenmp -fopenmp-version=50 -ast-print %s -Wno-openmp-mapping | FileCheck %s --check-prefix=CHECK --check-prefix=OMP502// RUN: %clang_cc1 -fopenmp -fopenmp-version=50 -x c++ -std=c++11 -emit-pch -o %t %s3// RUN: %clang_cc1 -fopenmp -fopenmp-version=50 -std=c++11 -include-pch %t -verify %s -ast-print -Wno-openmp-mapping | FileCheck %s --check-prefix=CHECK --check-prefix=OMP504// RUN: %clang_cc1 -verify -fopenmp -ast-print %s -Wno-openmp-mapping -DOMP51 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP515// RUN: %clang_cc1 -fopenmp -x c++ -std=c++11 -emit-pch -o %t %s -DOMP516// RUN: %clang_cc1 -fopenmp -std=c++11 -include-pch %t -verify %s -ast-print -Wno-openmp-mapping -DOMP51 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP517 8// RUN: %clang_cc1 -verify -fopenmp-simd -fopenmp-version=50 -ast-print %s -Wno-openmp-mapping | FileCheck %s --check-prefix=CHECK --check-prefix=OMP509// RUN: %clang_cc1 -fopenmp-simd -fopenmp-version=50 -x c++ -std=c++11 -emit-pch -o %t %s10// RUN: %clang_cc1 -fopenmp-simd -fopenmp-version=50 -std=c++11 -include-pch %t -verify %s -ast-print -Wno-openmp-mapping | FileCheck %s --check-prefix=CHECK --check-prefix=OMP5011// RUN: %clang_cc1 -verify -fopenmp-simd -ast-print %s -Wno-openmp-mapping -DOMP51 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP5112// RUN: %clang_cc1 -fopenmp-simd -x c++ -std=c++11 -emit-pch -o %t %s -DOMP5113// RUN: %clang_cc1 -fopenmp-simd -std=c++11 -include-pch %t -verify %s -ast-print -Wno-openmp-mapping -DOMP51 | FileCheck %s --check-prefix=CHECK --check-prefix=OMP5114// expected-no-diagnostics15 16#ifndef HEADER17#define HEADER18 19void foo() {}20 21int x;22#pragma omp threadprivate(x)23 24struct S {25 S(): a(0) {}26 S(int v) : a(v) {}27 int a;28 typedef int type;29};30 31template <typename T>32class S7 : public T {33protected:34 T a;35 S7() : a(0) {}36 37public:38 S7(typename T::type v) : a(v) {39#pragma omp target40#pragma omp teams distribute parallel for private(a) private(this->a) private(T::a)41 for (int k = 0; k < a.a; ++k)42 ++this->a.a;43 }44 S7 &operator=(S7 &s) {45#pragma omp target46#pragma omp teams distribute parallel for private(a) private(this->a)47 for (int k = 0; k < s.a.a; ++k)48 ++s.a.a;49 50 foo();51 return *this;52 }53 void foo() {54 int b, argv, d, c, e, f;55#pragma omp target56#pragma omp teams distribute parallel for default(none), private(b) firstprivate(argv) shared(d) reduction(+:c) reduction(max:e) num_teams(f) thread_limit(d) copyin(x)57 for (int k = 0; k < a.a; ++k)58 ++a.a;59 }60};61// CHECK: #pragma omp target62// CHECK-NEXT: #pragma omp teams distribute parallel for private(this->a) private(this->a) private(T::a)63// CHECK: #pragma omp target64// CHECK-NEXT: #pragma omp teams distribute parallel for private(this->a) private(this->a)65// CHECK: #pragma omp target66// CHECK-NEXT: #pragma omp teams distribute parallel for default(none) private(b) firstprivate(argv) shared(d) reduction(+: c) reduction(max: e) num_teams(f) thread_limit(d) copyin(x)67 68class S8 : public S7<S> {69 S8() {}70 71public:72 S8(int v) : S7<S>(v){73#pragma omp target74#pragma omp teams distribute parallel for private(a) private(this->a) private(S7<S>::a) 75 for (int k = 0; k < a.a; ++k)76 ++this->a.a;77 }78 S8 &operator=(S8 &s) {79#pragma omp target80#pragma omp teams distribute parallel for private(a) private(this->a)81 for (int k = 0; k < s.a.a; ++k)82 ++s.a.a;83 84 bar();85 return *this;86 }87 void bar() {88 int b, argv, d, c, e, f8;89#pragma omp target90#pragma omp teams distribute parallel for allocate(b) default(none), private(b) firstprivate(argv) shared(d) reduction(+:c) reduction(max:e) num_teams(f8) thread_limit(d) copyin(x) allocate(argv)91 for (int k = 0; k < a.a; ++k)92 ++a.a;93 }94};95// CHECK: #pragma omp target96// CHECK-NEXT: #pragma omp teams distribute parallel for private(this->a) private(this->a) private(this->S::a)97// CHECK: #pragma omp target98// CHECK-NEXT: #pragma omp teams distribute parallel for private(this->a) private(this->a) private(this->S7<S>::a)99// CHECK: #pragma omp target100// CHECK-NEXT: #pragma omp teams distribute parallel for private(this->a) private(this->a)101// CHECK: #pragma omp target102// CHECK-NEXT: #pragma omp teams distribute parallel for allocate(b) default(none) private(b) firstprivate(argv) shared(d) reduction(+: c) reduction(max: e) num_teams(f8) thread_limit(d) copyin(x) allocate(argv)103 104template <class T, int N>105T tmain(T argc) {106 T b = argc, c, d, e, f, g;107 static T a;108// CHECK: static T a;109 const T clen = 5;110 const T alen = 16;111 int arr[10];112#pragma omp target113#pragma omp teams distribute parallel for114 for (int i=0; i < 2; ++i)115 a = 2;116// CHECK: #pragma omp target117// CHECK-NEXT: #pragma omp teams distribute parallel for{{$}}118// CHECK-NEXT: for (int i = 0; i < 2; ++i)119// CHECK-NEXT: a = 2;120#pragma omp target121#ifdef OMP51122#pragma omp teams distribute parallel for private(argc, b), firstprivate(c, d), collapse(2) order(unconstrained:concurrent)123#else124#pragma omp teams distribute parallel for private(argc, b), firstprivate(c, d), collapse(2) order(concurrent)125#endif // OMP51126 for (int i = 0; i < 10; ++i)127 for (int j = 0; j < 10; ++j)128 foo();129// CHECK: #pragma omp target130// OMP50: #pragma omp teams distribute parallel for private(argc,b) firstprivate(c,d) collapse(2) order(concurrent)131// OMP51: #pragma omp teams distribute parallel for private(argc,b) firstprivate(c,d) collapse(2) order(unconstrained: concurrent)132// CHECK-NEXT: for (int i = 0; i < 10; ++i)133// CHECK-NEXT: for (int j = 0; j < 10; ++j)134// CHECK-NEXT: foo();135 for (int i = 0; i < 10; ++i)136 foo();137// CHECK: for (int i = 0; i < 10; ++i)138// CHECK-NEXT: foo();139#pragma omp target140#pragma omp teams distribute parallel for141 for (int i = 0; i < 10; ++i)142 foo();143// CHECK: #pragma omp target144// CHECK-NEXT: #pragma omp teams distribute parallel for145// CHECK-NEXT: for (int i = 0; i < 10; ++i)146// CHECK-NEXT: foo(); 147#pragma omp target148#pragma omp teams distribute parallel for default(none), private(b) firstprivate(argc) shared(d) reduction(+:c) reduction(max:e) num_teams(f) thread_limit(d) copyin(x)149 for (int k = 0; k < 10; ++k)150 e += d + argc;151// CHECK: #pragma omp target152// CHECK-NEXT: #pragma omp teams distribute parallel for default(none) private(b) firstprivate(argc) shared(d) reduction(+: c) reduction(max: e) num_teams(f) thread_limit(d) copyin(x)153// CHECK-NEXT: for (int k = 0; k < 10; ++k)154// CHECK-NEXT: e += d + argc;155#pragma omp target156#pragma omp teams distribute parallel for157 for (int k = 0; k < 10; ++k)158 e += d + argc;159// CHECK: #pragma omp target160// CHECK-NEXT: #pragma omp teams distribute parallel for161// CHECK-NEXT: for (int k = 0; k < 10; ++k)162// CHECK-NEXT: e += d + argc;163 return T();164}165 166int main (int argc, char **argv) {167 int b = argc, c, d, e, f, g;168 static int a;169// CHECK: static int a;170 const int clen = 5;171 const int N = 10;172 int arr[10];173#pragma omp target174#pragma omp teams distribute parallel for175 for (int i=0; i < 2; ++i)176 a = 2;177// CHECK: #pragma omp target178// CHECK-NEXT: #pragma omp teams distribute parallel for179// CHECK-NEXT: for (int i = 0; i < 2; ++i)180// CHECK-NEXT: a = 2;181#pragma omp target182#pragma omp teams distribute parallel for private(argc,b),firstprivate(argv, c), collapse(2)183 for (int i = 0; i < 10; ++i)184 for (int j = 0; j < 10; ++j)185 foo();186// CHECK: #pragma omp target187// CHECK-NEXT: #pragma omp teams distribute parallel for private(argc,b) firstprivate(argv,c) collapse(2)188// CHECK-NEXT: for (int i = 0; i < 10; ++i)189// CHECK-NEXT: for (int j = 0; j < 10; ++j)190// CHECK-NEXT: foo();191 for (int i = 0; i < 10; ++i)192 foo();193// CHECK: for (int i = 0; i < 10; ++i)194// CHECK-NEXT: foo();195#pragma omp target196#pragma omp teams distribute parallel for197 for (int i = 0; i < 10; ++i)foo();198// CHECK: #pragma omp target199// CHECK-NEXT: #pragma omp teams distribute parallel for200// CHECK-NEXT: for (int i = 0; i < 10; ++i)201// CHECK-NEXT: foo();202#pragma omp target203#pragma omp teams distribute parallel for default(none), private(b) firstprivate(argc) shared(d) reduction(+:c) reduction(max:e) num_teams(f) thread_limit(d) copyin(x)204 for (int k = 0; k < 10; ++k)205 e += d + argc;206// CHECK: #pragma omp target207// CHECK-NEXT: #pragma omp teams distribute parallel for default(none) private(b) firstprivate(argc) shared(d) reduction(+: c) reduction(max: e) num_teams(f) thread_limit(d) copyin(x)208// CHECK-NEXT: for (int k = 0; k < 10; ++k)209// CHECK-NEXT: e += d + argc;210#pragma omp target211#pragma omp teams distribute parallel for reduction(task,&&:argc)212 for (int k = 0; k < 10; ++k)213 e += d + argc;214// CHECK: #pragma omp target215// CHECK-NEXT: #pragma omp teams distribute parallel for reduction(task, &&: argc)216// CHECK-NEXT: for (int k = 0; k < 10; ++k)217// CHECK-NEXT: e += d + argc;218 return (0);219}220 221#endif222