|
0
|
1 // { dg-do run }
|
|
|
2
|
|
|
3 #include <omp.h>
|
|
|
4 #include <assert.h>
|
|
|
5
|
|
|
6 struct B
|
|
|
7 {
|
|
|
8 static int icount;
|
|
|
9 static int dcount;
|
|
|
10 static int ccount;
|
|
|
11 static B *e_inner;
|
|
|
12 static B *e_outer;
|
|
|
13
|
|
|
14 B();
|
|
|
15 B(int);
|
|
|
16 B(const B &);
|
|
|
17 ~B();
|
|
|
18 B& operator=(const B &);
|
|
|
19 void doit();
|
|
|
20 };
|
|
|
21
|
|
|
22 int B::icount;
|
|
|
23 int B::dcount;
|
|
|
24 int B::ccount;
|
|
|
25 B * B::e_inner;
|
|
|
26 B * B::e_outer;
|
|
|
27
|
|
|
28 B::B()
|
|
|
29 {
|
|
|
30 #pragma omp atomic
|
|
|
31 icount++;
|
|
|
32 }
|
|
|
33
|
|
|
34 B::B(int)
|
|
|
35 {
|
|
|
36 e_outer = this;
|
|
|
37 }
|
|
|
38
|
|
|
39 B::~B()
|
|
|
40 {
|
|
|
41 #pragma omp atomic
|
|
|
42 dcount++;
|
|
|
43 }
|
|
|
44
|
|
|
45 B& B::operator= (const B &b)
|
|
|
46 {
|
|
|
47 assert (&b == e_inner);
|
|
|
48 assert (this == e_outer);
|
|
|
49 #pragma omp atomic
|
|
|
50 ccount++;
|
|
|
51 return *this;
|
|
|
52 }
|
|
|
53
|
|
|
54 void B::doit()
|
|
|
55 {
|
|
|
56 #pragma omp critical
|
|
|
57 {
|
|
|
58 assert (e_inner == 0);
|
|
|
59 e_inner = this;
|
|
|
60 }
|
|
|
61 }
|
|
|
62
|
|
|
63 static int nthreads;
|
|
|
64
|
|
|
65 void foo()
|
|
|
66 {
|
|
|
67 B b(0);
|
|
|
68
|
|
|
69 #pragma omp parallel sections lastprivate(b)
|
|
|
70 {
|
|
|
71 #pragma omp section
|
|
|
72 nthreads = omp_get_num_threads ();
|
|
|
73 #pragma omp section
|
|
|
74 b.doit ();
|
|
|
75 }
|
|
|
76 }
|
|
|
77
|
|
|
78 int main()
|
|
|
79 {
|
|
|
80 omp_set_dynamic (0);
|
|
|
81 omp_set_num_threads (4);
|
|
|
82 foo();
|
|
|
83
|
|
|
84 assert (B::ccount == 1);
|
|
|
85 assert (B::icount == nthreads);
|
|
|
86 assert (B::dcount == nthreads+1);
|
|
|
87
|
|
|
88 return 0;
|
|
|
89 }
|
