diff options
| author | Ben.Lippmeier@anu.edu.au <unknown> | 2009-02-13 00:49:10 +0000 |
|---|---|---|
| committer | Ben.Lippmeier@anu.edu.au <unknown> | 2009-02-13 00:49:10 +0000 |
| commit | c83d2d16d72825ea5ef9a1b3c7096fc9e19491b7 (patch) | |
| tree | d2d97ae954226a11fcd070d23f42b8d3d5b157bd /includes/SMP.h | |
| parent | e3029b1d193614f53a4d132637269f568deb0d46 (diff) | |
| download | haskell-c83d2d16d72825ea5ef9a1b3c7096fc9e19491b7.tar.gz | |
NCG: Use sync instead of msync for a memory barrier for powerpc
Darwin 9.6.0 + GCC 4.0.1 doesn't understand "msync".
I think "sync" means the same thing.
Diffstat (limited to 'includes/SMP.h')
| -rw-r--r-- | includes/SMP.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/includes/SMP.h b/includes/SMP.h index c851054cd9..223f1581a3 100644 --- a/includes/SMP.h +++ b/includes/SMP.h @@ -195,7 +195,7 @@ store_load_barrier(void) { #elif x86_64_HOST_ARCH __asm__ __volatile__ ("lock; addq $0,0(%%rsp)" : : : "memory"); #elif powerpc_HOST_ARCH - __asm__ __volatile__ ("msync" : : : "memory"); + __asm__ __volatile__ ("sync" : : : "memory"); #elif sparc_HOST_ARCH /* Sparc in TSO mode does not require write/write barriers. */ __asm__ __volatile__ ("membar" : : : "memory"); |