diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2022-11-19 16:57:53 +0000 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2023-01-26 18:39:37 -0500 |
| commit | 893f7a947ad5f6e7a8be1693a04849a537e4d0a8 (patch) | |
| tree | e5eed78574caaf50bc938cda4803a6d0debd4c80 /rts/sm/HeapAlloc.h | |
| parent | 5640cb1d84d3cce4ce0a9e90d29b2b20d2b38c2f (diff) | |
| download | haskell-893f7a947ad5f6e7a8be1693a04849a537e4d0a8.tar.gz | |
rts: Drop SM spinlockwip/no-sm-spinlock
Diffstat (limited to 'rts/sm/HeapAlloc.h')
| -rw-r--r-- | rts/sm/HeapAlloc.h | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/rts/sm/HeapAlloc.h b/rts/sm/HeapAlloc.h index 58aae1119d..a24c1def2f 100644 --- a/rts/sm/HeapAlloc.h +++ b/rts/sm/HeapAlloc.h @@ -10,6 +10,8 @@ #include "BeginPrivate.h" +#include "Storage.h" + /* ----------------------------------------------------------------------------- The HEAP_ALLOCED() test. @@ -210,9 +212,9 @@ StgBool HEAP_ALLOCED_GC(const void *p) } else { // putting the rest out of line turned out to be a slight // performance improvement: - ACQUIRE_SPIN_LOCK(&gc_alloc_block_sync); + ACQUIRE_SM_LOCK; // TODO: this may be too expensive b = HEAP_ALLOCED_miss(mblock,p); - RELEASE_SPIN_LOCK(&gc_alloc_block_sync); + RELEASE_SM_LOCK; return b; } } |