1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
// { dg-do compile }
struct A { int a; };
struct B { B(); };
struct C { C(); C(const C&); };
struct D { D& operator=(const D&); };
class E { private: E(); public: E(int); }; // { dg-error "private" }
class F { private: F(const F&); public: F(); }; // { dg-error "private" }
class G { private: G& operator=(const G&); }; // { dg-error "private" }
void bar();
void foo()
{
A a; B b; C c; D d; E e(0); F f; G g;
#pragma omp parallel shared(a, b, c, d, e, f, g)
bar();
#pragma omp parallel private(a, b, c, d, f, g)
bar();
#pragma omp parallel private(e) // { dg-error "context" }
bar();
#pragma omp parallel firstprivate(a, b, c, d, e, g)
bar();
#pragma omp parallel firstprivate(f) // { dg-error "context" }
bar();
#pragma omp parallel sections lastprivate(a, b, d, c, f)
{ bar(); }
#pragma omp parallel sections lastprivate(e) // { dg-error "context" }
{ bar(); }
#pragma omp parallel sections lastprivate(g) // { dg-error "context" }
{ bar(); }
#pragma omp parallel sections firstprivate(e) lastprivate(e)
{ bar(); }
}
|
