summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2023-04-14 05:57:48 -0400
committerBen Gamari <ben@smart-cactus.org>2023-04-24 06:03:49 -0400
commite968aa1906fe916bd1eae31bb6af34b8fd5e131d (patch)
tree87c2d1b543cbe69d420814af414bc786b9efcc02
parentc4a93bd7da42ede13aca4921b3d9c4cdacfed7df (diff)
downloadhaskell-e968aa1906fe916bd1eae31bb6af34b8fd5e131d.tar.gz
rts/IPE: Fix unused mutex warning
-rw-r--r--rts/IPE.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/rts/IPE.c b/rts/IPE.c
index 63df8be700..47674e9c7f 100644
--- a/rts/IPE.c
+++ b/rts/IPE.c
@@ -57,7 +57,6 @@ this all IPE lists of all IpeBufferListNode are traversed to insert all IPEs.
After the content of a IpeBufferListNode has been inserted, it's freed.
*/
-static Mutex ipeMapLock;
static HashTable *ipeMap = NULL;
// Accessed atomically
@@ -65,6 +64,8 @@ static IpeBufferListNode *ipeBufferList = NULL;
#if defined(THREADED_RTS)
+static Mutex ipeMapLock;
+
void initIpe(void) { initMutex(&ipeMapLock); }
void exitIpe(void) { closeMutex(&ipeMapLock); }