summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2022-02-15 21:33:32 -0500
committerMarge Bot <ben+marge-bot@smart-cactus.org>2022-02-17 05:26:03 -0500
commit67dd5724297094af93be1887ef000845722c6f2b (patch)
tree4992ddb2b10b74513331997a7435be2eacbd15ba
parent4e6c80197f1cc46dfdef0300de46847c7cfbdcb0 (diff)
downloadhaskell-67dd5724297094af93be1887ef000845722c6f2b.tar.gz
rts/AdjustorPool: Silence unused function warning
bitmap_get is only used in the DEBUG RTS configuration. Fixes #21079.
-rw-r--r--rts/adjustor/AdjustorPool.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/rts/adjustor/AdjustorPool.c b/rts/adjustor/AdjustorPool.c
index b8171d4cc6..7ed9f2e5da 100644
--- a/rts/adjustor/AdjustorPool.c
+++ b/rts/adjustor/AdjustorPool.c
@@ -187,7 +187,8 @@ bitmap_set(uint8_t *bitmap, size_t idx, bool value)
}
}
-static bool
+// N.B. this is unused in non-DEBUG compilers
+static bool STG_UNUSED
bitmap_get(uint8_t *bitmap, size_t idx)
{
size_t word_n = idx / 8;