f965b46c8e
Reviewed-By: Aaron Watry <awatry@gmail.com> Tested-By: Aaron Watry <awatry@gmail.com> Signed-off-by: Jan Vesely <jan.vesely@rutgers.edu> llvm-svn: 335278
13 lines
259 B
Common Lisp
13 lines
259 B
Common Lisp
#include <clc/clc.h>
|
|
|
|
#define IMPL(TYPE, AS) \
|
|
_CLC_OVERLOAD _CLC_DEF TYPE atomic_dec(volatile AS TYPE *p) { \
|
|
return __sync_fetch_and_sub(p, (TYPE)1); \
|
|
}
|
|
|
|
IMPL(int, global)
|
|
IMPL(unsigned int, global)
|
|
IMPL(int, local)
|
|
IMPL(unsigned int, local)
|
|
#undef IMPL
|