diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2014-12-19 20:10:40 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2015-01-13 20:34:13 +0000 |
| commit | 24bbc3e7077f5f6cd51f118393e5342a4047978c (patch) | |
| tree | 668739a12812b3a01e8e12f95d500a5250c2e53e /rts/CheckUnload.c | |
| parent | 2a103c7d763c22dc9b0562dac1184ffb950da5ce (diff) | |
| download | haskell-24bbc3e7077f5f6cd51f118393e5342a4047978c.tar.gz | |
Allow the linker to run concurrently with the GC
Diffstat (limited to 'rts/CheckUnload.c')
| -rw-r--r-- | rts/CheckUnload.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/CheckUnload.c b/rts/CheckUnload.c index 73573fbb34..2c01113f63 100644 --- a/rts/CheckUnload.c +++ b/rts/CheckUnload.c @@ -260,7 +260,7 @@ void checkUnload (StgClosure *static_objects) if (unloaded_objects == NULL) return; - ACQUIRE_LOCK(&linker_mutex); + ACQUIRE_LOCK(&linker_unloaded_mutex); // Mark every unloadable object as unreferenced initially for (oc = unloaded_objects; oc; oc = oc->next) { @@ -320,5 +320,5 @@ void checkUnload (StgClosure *static_objects) freeHashTable(addrs, NULL); - RELEASE_LOCK(&linker_mutex); + RELEASE_LOCK(&linker_unloaded_mutex); } |