shithub: mc

ref: 2b13a0a743d0dac2d7d18a7a7144deee1a081a85
dir: /lib/thread/test/atomic.myr/

View raw version 
use std
use thread

use "test/util.use"

const Nherd = 20

var val : uint64 = 0
var done : uint32 = 0

const main = {
	done = 0
	val = 0
	mkherd(Nherd, incvar)
	while thread.xget(&done) != Nherd
		/* nothing */
	;;
	std.assert(val == 2_000_000, "atomics are broken\n")
}

const incvar = {
	var i

	for i = 0; i < 100_000; i++
		thread.xadd(&val, 1)
	;;
	thread.xadd(&done, 1)
}