Atomic updates: Difference between revisions
m
→{{header|Phix}}
Line 2,677:
$t1->join; $t2->join; $t3->join;</lang>
=={{header|Phix}}==
Requires Phix 0.6.7 or later (due 1st Sept 15)
<lang Phix>constant nBuckets = 20
sequence buckets = tagset(nBuckets) -- {1,2,3,..,20}
constant bucket_cs = init_cs() -- critical section
Line 2,725 ⟶ 2,724:
end while
terminate = 1
wait_thread(threads)</lang>
{{out}}
<pre>
| |||