-
Notifications
You must be signed in to change notification settings - Fork 11
/
Copy pathBarrierTreeB.c
42 lines (35 loc) · 1.09 KB
/
BarrierTreeB.c
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
39
40
41
42
typedef VTYPE CALIGN * Barrier;
static TYPE PAD1 CALIGN __attribute__(( unused )); // protect further false sharing
static Barrier b CALIGN;
static TYPE PAD2 CALIGN __attribute__(( unused )); // protect further false sharing
#define BARRIER_DECL
#define BARRIER_CALL block( b, p );
static inline void block( Barrier aa, TYPE p ) {
TYPE aap = aa[p]; // optimization
if ( p < N - 1 ) {
for ( TYPE kk = 1; kk < N ; kk++ ) {
await( aap != aa[p + 1] );
} // for
} else {
// CALL ACTION CALLBACK BEFORE TRIGGERING BARRIER
} // if
aap = ! aap;
aa[p] = aap;
Fence();
await( aap == aa[0] );
} // block
#include "BarrierWorker.c"
void __attribute__((noinline)) ctor() {
worker_ctor();
b = Allocator( sizeof(typeof(b[0])) * N );
for ( size_t i = 0; i < N; i += 1 ) {
b[i] = false;
} // for
} // ctor
void __attribute__((noinline)) dtor() {
free( (void *)b );
worker_dtor();
} // dtor
// Local Variables: //
// compile-command: "gcc -Wall -Wextra -std=gnu11 -O3 -DNDEBUG -fno-reorder-functions -DPIN -DAlgorithm=BarrierTreeB Harness.c -lpthread -lm -D`hostname` -DCFMT" //
// End: //