5 #elif defined HAVE_GCC_ATOMIC_BUILTINS
11 # define ATOMIC_SET(var, val) (void)__sync_lock_test_and_set(&(var), (val))
12 # define ATOMIC_INC(var) __sync_fetch_and_add(&(var), 1)
13 # define ATOMIC_DEC(var) __sync_fetch_and_sub(&(var), 1)
14 # define ATOMIC_OR(var, val) __sync_or_and_fetch(&(var), (val))
15 # define ATOMIC_EXCHANGE(var, val) __sync_lock_test_and_set(&(var), (val))
17 # define ATOMIC_SIZE_ADD(var, val) __sync_fetch_and_add(&(var), (val))
18 # define ATOMIC_SIZE_SUB(var, val) __sync_fetch_and_sub(&(var), (val))
19 # define ATOMIC_SIZE_INC(var) __sync_fetch_and_add(&(var), 1)
20 # define ATOMIC_SIZE_DEC(var) __sync_fetch_and_sub(&(var), 1)
21 # define ATOMIC_SIZE_EXCHANGE(var, val) __sync_lock_test_and_set(&(var), (val))
24 #if defined _MSC_VER && _MSC_VER > 1200
25 #pragma intrinsic(_InterlockedOr)
29 # define ATOMIC_SET(var, val) InterlockedExchange(&(var), (val))
30 # define ATOMIC_INC(var) InterlockedIncrement(&(var))
31 # define ATOMIC_DEC(var) InterlockedDecrement(&(var))
33 # define ATOMIC_OR(var, val) __asm__("lock\n\t" "orl\t%1, %0" : "=m"(var) : "Ir"(val))
34 #elif defined _MSC_VER && _MSC_VER <= 1200
35 # define ATOMIC_OR(var, val) rb_w32_atomic_or(&(var), (val))
42 __asm lock or [eax], ecx;
44 #error unsupported architecture
48 # define ATOMIC_OR(var, val) _InterlockedOr(&(var), (val))
50 # define ATOMIC_EXCHANGE(var, val) InterlockedExchange(&(var), (val))
53 # define ATOMIC_SIZE_ADD(var, val) InterlockedExchangeAdd64(&(var), (val))
54 # define ATOMIC_SIZE_SUB(var, val) InterlockedExchangeAdd64(&(var), -(val))
55 # define ATOMIC_SIZE_INC(var) InterlockedIncrement64(&(var))
56 # define ATOMIC_SIZE_DEC(var) InterlockedDecrement64(&(var))
57 # define ATOMIC_SIZE_EXCHANGE(var, val) InterlockedExchange64(&(var), (val))
59 # define ATOMIC_SIZE_ADD(var, val) InterlockedExchangeAdd((LONG *)&(var), (val))
60 # define ATOMIC_SIZE_SUB(var, val) InterlockedExchangeAdd((LONG *)&(var), -(val))
61 # define ATOMIC_SIZE_INC(var) InterlockedIncrement((LONG *)&(var))
62 # define ATOMIC_SIZE_DEC(var) InterlockedDecrement((LONG *)&(var))
63 # define ATOMIC_SIZE_EXCHANGE(var, val) InterlockedExchange((LONG *)&(var), (val))
66 #elif defined(__sun) && defined(HAVE_ATOMIC_H)
70 # define ATOMIC_SET(var, val) (void)atomic_swap_uint(&(var), (val))
71 # define ATOMIC_INC(var) atomic_inc_uint(&(var))
72 # define ATOMIC_DEC(var) atomic_dec_uint(&(var))
73 # define ATOMIC_OR(var, val) atomic_or_uint(&(var), (val))
74 # define ATOMIC_EXCHANGE(var, val) atomic_swap_uint(&(var), (val))
76 # if SIZEOF_SIZE_T == SIZEOF_LONG
77 # define ATOMIC_SIZE_ADD(var, val) atomic_add_long(&(var), (val))
78 # define ATOMIC_SIZE_SUB(var, val) atomic_add_long(&(var), -(val))
79 # define ATOMIC_SIZE_INC(var) atomic_inc_ulong(&(var))
80 # define ATOMIC_SIZE_DEC(var) atomic_dec_ulong(&(var))
81 # define ATOMIC_SIZE_EXCHANGE(var, val) atomic_swap_ulong(&(var), (val))
83 # define ATOMIC_SIZE_ADD(var, val) atomic_add_int(&(var), (val))
84 # define ATOMIC_SIZE_SUB(var, val) atomic_add_int(&(var), -(val))
85 # define ATOMIC_SIZE_INC(var) atomic_inc_uint(&(var))
86 # define ATOMIC_SIZE_DEC(var) atomic_dec_uint(&(var))
87 # define ATOMIC_SIZE_EXCHANGE(var, val) atomic_swap_uint(&(var), (val))
92 #define NEED_RUBY_ATOMIC_EXCHANGE
95 # define ATOMIC_SET(var, val) (void)((var) = (val))
96 # define ATOMIC_INC(var) ((var)++)
97 # define ATOMIC_DEC(var) ((var)--)
98 # define ATOMIC_OR(var, val) ((var) |= (val))
99 # define ATOMIC_EXCHANGE(var, val) ruby_atomic_exchange(&(var), (val))
101 # define ATOMIC_SIZE_ADD(var, val) (void)((var) += (val))
102 # define ATOMIC_SIZE_SUB(var, val) (void)((var) -= (val))
103 # define ATOMIC_SIZE_INC(var) ((var)++)
104 # define ATOMIC_SIZE_DEC(var) ((var)--)
105 # define ATOMIC_SIZE_EXCHANGE(var, val) atomic_size_exchange(&(var), (val))
static size_t atomic_size_exchange(size_t *ptr, size_t val)
rb_atomic_t ruby_atomic_exchange(rb_atomic_t *ptr, rb_atomic_t val)