xref: /llvm-project/clang/test/OpenMP/single_ast_print.cpp (revision 7c1d9b15eee3a34678addab2bab66f3020ac0753)
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 -verify %s -ast-print | FileCheck %s
4 
5 // RUN: %clang_cc1 -verify -fopenmp-simd -ast-print %s | FileCheck %s
6 // RUN: %clang_cc1 -fopenmp-simd -x c++ -std=c++11 -emit-pch -o %t %s
7 // RUN: %clang_cc1 -fopenmp-simd -std=c++11 -include-pch %t -verify %s -ast-print | FileCheck %s
8 // expected-no-diagnostics
9 
10 #ifndef HEADER
11 #define HEADER
12 
foo()13 void foo() {}
14 
15 struct SS {
16   int a;
17   int b : 4;
18   int &c;
SSSS19   SS(int &d) : a(0), b(0), c(d) {
20 #pragma omp parallel firstprivate(a, b, c)
21 #pragma omp single copyprivate(a, this->b, (this)->c)
22 // CHECK: #pragma omp parallel firstprivate(this->a,this->b,this->c)
23 // CHECK-NEXT: #pragma omp single copyprivate(this->a,this->b,this->c){{$}}
24     ++this->a, --b, (this)->c /= 1;
25   }
26 };
27 
28 template<typename T>
29 struct SST {
30   T a;
SSTSST31   SST() : a(T()) {
32 // CHECK: #pragma omp parallel firstprivate(this->a)
33 // CHECK-NEXT: #pragma omp single copyprivate(this->a)
34 // CHECK: #pragma omp parallel firstprivate(this->a)
35 // CHECK-NEXT: #pragma omp single copyprivate(this->a)
36 #pragma omp parallel firstprivate(a)
37 #pragma omp single copyprivate(this->a)
38     ++this->a;
39   }
40 };
41 
42 template <class T, int N>
tmain(T argc)43 T tmain(T argc) {
44   T b = argc, c, d, e, f, g;
45   static T a;
46   SST<T> sst;
47 // CHECK: static T a;
48 #pragma omp parallel private(g)
49 #pragma omp single private(argc, b), firstprivate(c, d), nowait allocate(d)
50   foo();
51   // CHECK: #pragma omp parallel private(g)
52   // CHECK-NEXT: #pragma omp single private(argc,b) firstprivate(c,d) nowait allocate(d)
53   // CHECK-NEXT: foo();
54 #pragma omp parallel private(g)
55 #pragma omp single allocate(argc) private(argc, b), firstprivate(c, d), copyprivate(g)
56   foo();
57   // CHECK-NEXT: #pragma omp parallel private(g)
58   // CHECK-NEXT: #pragma omp single allocate(argc) private(argc,b) firstprivate(c,d) copyprivate(g)
59   // CHECK-NEXT: foo();
60   return T();
61 }
62 
main(int argc,char ** argv)63 int main(int argc, char **argv) {
64 // CHECK: int main(int argc, char **argv) {
65   int b = argc, c, d, e, f, g;
66   static int a;
67   SS ss(a);
68 // CHECK: static int a;
69 #pragma omp parallel private(g)
70 #pragma omp single private(argc, b), firstprivate(argv, c), nowait
71   foo();
72   // CHECK: #pragma omp parallel private(g)
73   // CHECK-NEXT: #pragma omp single private(argc,b) firstprivate(argv,c) nowait
74   // CHECK-NEXT: foo();
75 #pragma omp parallel private(g)
76 #pragma omp single private(argc, b), firstprivate(c, d), copyprivate(g)
77   foo();
78   // CHECK-NEXT: #pragma omp parallel private(g)
79   // CHECK-NEXT: #pragma omp single private(argc,b) firstprivate(c,d) copyprivate(g)
80   // CHECK-NEXT: foo();
81   return (tmain<int, 5>(argc) + tmain<char, 1>(argv[0][0]));
82 }
83 
84 #endif
85