Clang Project

clang_source_code/test/OpenMP/single_private_messages.cpp
1// RUN: %clang_cc1 -verify -fopenmp %s
2
3// RUN: %clang_cc1 -verify -fopenmp-simd %s
4
5extern int omp_default_mem_alloc;
6void foo() {
7}
8
9bool foobool(int argc) {
10  return argc;
11}
12
13struct S1; // expected-note 2 {{declared here}} expected-note 2 {{forward declaration of 'S1'}}
14extern S1 a;
15class S2 {
16  mutable int a;
17
18public:
19  S2() : a(0) {}
20};
21const S2 b;
22const S2 ba[5];
23class S3 {
24  int a;
25
26public:
27  S3() : a(0) {}
28};
29const S3 ca[5];
30class S4 {
31  int a;
32  S4(); // expected-note {{implicitly declared private here}}
33
34public:
35  S4(int v) : a(v) {
36#pragma omp single private(a) private(this->a)
37    for (int k = 0; k < v; ++k)
38      ++this->a;
39  }
40};
41class S5 {
42  int a;
43  S5() : a(0) {} // expected-note {{implicitly declared private here}}
44
45public:
46  S5(int v) : a(v) {}
47  S5 &operator=(S5 &s) {
48#pragma omp single private(a) private(this->a) private(s.a) // expected-error {{expected variable name or data member of current class}}
49    for (int k = 0; k < s.a; ++k)
50      ++s.a;
51    return *this;
52  }
53};
54
55template <typename T>
56class S6 {
57public:
58  T a;
59
60  S6() : a(0) {}
61  S6(T v) : a(v) {
62#pragma omp single private(a) private(this->a)
63    for (int k = 0; k < v; ++k)
64      ++this->a;
65  }
66  S6 &operator=(S6 &s) {
67#pragma omp single private(a) private(this->a) private(s.a) // expected-error {{expected variable name or data member of current class}}
68    for (int k = 0; k < s.a; ++k)
69      ++s.a;
70    return *this;
71  }
72};
73
74template <typename T>
75class S7 : public T {
76  T a;
77  S7() : a(0) {}
78
79public:
80  S7(T v) : a(v) {
81#pragma omp single private(a) private(this->a) private(T::a)
82    for (int k = 0; k < a.a; ++k)
83      ++this->a.a;
84  }
85  S7 &operator=(S7 &s) {
86#pragma omp single private(a) private(this->a) private(s.a) private(s.T::a) // expected-error 2 {{expected variable name or data member of current class}}
87    for (int k = 0; k < s.a.a; ++k)
88      ++s.a.a;
89    return *this;
90  }
91};
92
93S3 h;
94#pragma omp threadprivate(h) // expected-note 2 {{defined as threadprivate or thread local}}
95
96template <class I, class C>
97int foomain(I argc, C **argv) {
98  I e(4);
99  I g(5);
100  int i;
101  int &j = i;
102#pragma omp single private // expected-error {{expected '(' after 'private'}}
103  foo();
104#pragma omp single private( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
105  foo();
106#pragma omp single private() // expected-error {{expected expression}}
107  foo();
108#pragma omp single private(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
109  foo();
110#pragma omp single private(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
111  foo();
112#pragma omp single private(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
113  foo();
114#pragma omp single private(argc) allocate , allocate(, allocate(omp_default , allocate(omp_default_mem_alloc, allocate(omp_default_mem_alloc:, allocate(omp_default_mem_alloc: argc, allocate(omp_default_mem_alloc: argv), allocate(argv) // expected-error {{expected '(' after 'allocate'}} expected-error 2 {{expected expression}} expected-error 2 {{expected ')'}} expected-error {{use of undeclared identifier 'omp_default'}} expected-note 2 {{to match this '('}}
115  foo();
116#pragma omp single private(S1) // expected-error {{'S1' does not refer to a value}}
117  foo();
118#pragma omp single private(a, b) // expected-error {{private variable with incomplete type 'S1'}}
119  foo();
120#pragma omp single private(argv[1]) // expected-error {{expected variable name}}
121  foo();
122#pragma omp single private(e, g)
123  foo();
124#pragma omp single private(h) // expected-error {{threadprivate or thread local variable cannot be private}}
125  foo();
126#pragma omp single shared(i) // expected-error {{unexpected OpenMP clause 'shared' in directive '#pragma omp single'}}
127  foo();
128#pragma omp parallel
129  {
130    int v = 0;
131    int i;
132#pragma omp single private(i)
133    foo();
134    v += i;
135  }
136#pragma omp parallel shared(i)
137#pragma omp parallel private(i)
138#pragma omp single private(j)
139  foo();
140#pragma omp single private(i)
141  foo();
142  return 0;
143}
144
145namespace A {
146double x;
147#pragma omp threadprivate(x) // expected-note {{defined as threadprivate or thread local}}
148}
149namespace B {
150using A::x;
151}
152
153int main(int argc, char **argv) {
154  S4 e(4);
155  S5 g(5);
156  S6<float> s6(0.0) , s6_0(1.0);
157  S7<S6<float> > s7(0.0) , s7_0(1.0);
158  int i;
159  int &j = i;
160#pragma omp single private // expected-error {{expected '(' after 'private'}}
161  foo();
162#pragma omp single private( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
163  foo();
164#pragma omp single private() // expected-error {{expected expression}}
165  foo();
166#pragma omp single private(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
167  foo();
168#pragma omp single private(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
169  foo();
170#pragma omp single private(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
171  foo();
172#pragma omp single private(argc)
173  foo();
174#pragma omp single private(S1) // expected-error {{'S1' does not refer to a value}}
175  foo();
176#pragma omp single private(a, b) // expected-error {{private variable with incomplete type 'S1'}}
177  foo();
178#pragma omp single private(argv[1]) // expected-error {{expected variable name}}
179  foo();
180#pragma omp single private(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}}
181  foo();
182#pragma omp single private(h, B::x) // expected-error 2 {{threadprivate or thread local variable cannot be private}}
183  foo();
184#pragma omp single shared(i) // expected-error {{unexpected OpenMP clause 'shared' in directive '#pragma omp single'}}
185  foo();
186#pragma omp parallel
187  {
188    int i;
189#pragma omp single private(i)
190    foo();
191  }
192#pragma omp parallel shared(i)
193#pragma omp parallel private(i)
194#pragma omp single private(j)
195  foo();
196#pragma omp single private(i)
197  foo();
198  static int m;
199#pragma omp single private(m) // OK
200  foo();
201
202  s6 = s6_0; // expected-note {{in instantiation of member function 'S6<float>::operator=' requested here}}
203  s7 = s7_0; // expected-note {{in instantiation of member function 'S7<S6<float> >::operator=' requested here}}
204  return foomain(argc, argv); // expected-note {{in instantiation of function template specialization 'foomain<int, char>' requested here}}
205}
206
207