diff options
| author | Simon Marlow <simonmar@microsoft.com> | 2006-06-29 12:05:26 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2006-06-29 12:05:26 +0000 |
| commit | b19bcfd953fdb10059753c1270ac1e4631da0f53 (patch) | |
| tree | 94b058e349cbb770b64a59314cdf0d69252b11e6 /includes/SMP.h | |
| parent | 47f809644d5ccba8be7a27a9d8ebbb818cac33ef (diff) | |
| download | haskell-b19bcfd953fdb10059753c1270ac1e4631da0f53.tar.gz | |
use the new "prim %write_barrier()" in .cmm instead of calls to wb()
Diffstat (limited to 'includes/SMP.h')
| -rw-r--r-- | includes/SMP.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/includes/SMP.h b/includes/SMP.h index d985576cb4..68f16905c6 100644 --- a/includes/SMP.h +++ b/includes/SMP.h @@ -96,7 +96,7 @@ cas(StgVolatilePtr p, StgWord o, StgWord n) * that require it (not x86 or x86_64). */ INLINE_HEADER void -wb(void) { +write_barrier(void) { #if i386_HOST_ARCH || x86_64_HOST_ARCH __asm__ __volatile__ ("" : : : "memory"); #elif powerpc_HOST_ARCH @@ -136,7 +136,7 @@ unlockClosure(StgClosure *p, StgInfoTable *info) { #if i386_HOST_ARCH || x86_64_HOST_ARCH || powerpc_HOST_ARCH // This is a strictly ordered write, so we need a wb(): - wb(); + write_barrier(); p->header.info = info; #else RELEASE_SM_LOCK; @@ -145,7 +145,7 @@ unlockClosure(StgClosure *p, StgInfoTable *info) #else /* !THREADED_RTS */ -#define wb() /* nothing */ +#define write_barrier() /* nothing */ INLINE_HEADER StgWord xchg(StgPtr p, StgWord w) |