72 lines
		
	
	
		
			2.0 KiB
		
	
	
	
		
			V
		
	
	
			
		
		
	
	
			72 lines
		
	
	
		
			2.0 KiB
		
	
	
	
		
			V
		
	
	
module atomic2
 | 
						|
 | 
						|
import sync
 | 
						|
 | 
						|
/*
 | 
						|
Implements the atomic operations. For now TCC does not support
 | 
						|
the atomic versions on nix so it uses locks to simulate the same behavor.
 | 
						|
On windows tcc can simulate with other atomic operations.
 | 
						|
 | 
						|
The @VROOT/thirdparty/stdatomic contains compability header files
 | 
						|
for stdatomic that supports both nix, windows and c++.
 | 
						|
 | 
						|
This implementations should be regarded as alpha stage and be
 | 
						|
further tested.
 | 
						|
*/
 | 
						|
#flag windows -I @VROOT/thirdparty/stdatomic/win
 | 
						|
#flag linux -I @VROOT/thirdparty/stdatomic/nix
 | 
						|
#flag darwin -I @VROOT/thirdparty/stdatomic/nix
 | 
						|
#flag freebsd -I @VROOT/thirdparty/stdatomic/nix
 | 
						|
#flag solaris -I @VROOT/thirdparty/stdatomic/nix
 | 
						|
$if linux {
 | 
						|
	$if tinyc {
 | 
						|
		// most Linux distributions have /usr/lib/libatomic.so, but Ubuntu uses gcc version specific dir
 | 
						|
		#flag -L/usr/lib/gcc/x86_64-linux-gnu/6 -L/usr/lib/gcc/x86_64-linux-gnu/7 -L/usr/lib/gcc/x86_64-linux-gnu/8 -L/usr/lib/gcc/x86_64-linux-gnu/9 -latomic
 | 
						|
	}
 | 
						|
}
 | 
						|
#include <atomic.h>
 | 
						|
// add_u64 adds provided delta as an atomic operation
 | 
						|
pub fn add_u64(ptr &u64, delta int) bool {
 | 
						|
	res := C.atomic_fetch_add_u64(ptr, delta)
 | 
						|
	return res == 0
 | 
						|
}
 | 
						|
 | 
						|
// sub_u64 subtracts provided delta as an atomic operation
 | 
						|
pub fn sub_u64(ptr &u64, delta int) bool {
 | 
						|
	res := C.atomic_fetch_sub_u64(ptr, delta)
 | 
						|
	return res == 0
 | 
						|
}
 | 
						|
 | 
						|
// add_i64 adds provided delta as an atomic operation
 | 
						|
pub fn add_i64(ptr &i64, delta int) bool {
 | 
						|
	res := C.atomic_fetch_add_u64(ptr, delta)
 | 
						|
	return res == 0
 | 
						|
}
 | 
						|
 | 
						|
// add_i64 subtracts provided delta as an atomic operation
 | 
						|
pub fn sub_i64(ptr &i64, delta int) bool {
 | 
						|
	res := C.atomic_fetch_sub_u64(ptr, delta)
 | 
						|
	return res == 0
 | 
						|
}
 | 
						|
 | 
						|
// atomic store/load operations have to be used when there might be another concurrent access
 | 
						|
// atomicall set a value
 | 
						|
pub fn store_u64(ptr &u64, val u64) {
 | 
						|
	C.atomic_store_u64(ptr, val)
 | 
						|
}
 | 
						|
 | 
						|
// atomicall get a value
 | 
						|
pub fn load_u64(ptr &u64) u64 {
 | 
						|
	return C.atomic_load_u64(ptr)
 | 
						|
}
 | 
						|
 | 
						|
// atomicall set a value
 | 
						|
pub fn store_i64(ptr &i64, val i64) {
 | 
						|
	C.atomic_store_u64(ptr, val)
 | 
						|
}
 | 
						|
 | 
						|
// atomicall get a value
 | 
						|
pub fn load_i64(ptr &i64) i64 {
 | 
						|
	return i64(C.atomic_load_u64(ptr))
 | 
						|
}
 |