summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2021-03-12 05:37:42 -0500
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-04-02 05:15:59 -0400
commitee55d57e90ea497d389a5a47504174b213ba0598 (patch)
tree557c3e568a3cdd919081f71a679127a7ab74088f
parentee8775717af298a6e2e06635f19e5ba9e7ef4836 (diff)
downloadhaskell-ee55d57e90ea497d389a5a47504174b213ba0598.tar.gz
Fix copy+pasto in Sanity.c
-rw-r--r--rts/sm/Sanity.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/sm/Sanity.c b/rts/sm/Sanity.c
index b39559a653..ceb71c59ec 100644
--- a/rts/sm/Sanity.c
+++ b/rts/sm/Sanity.c
@@ -1273,7 +1273,7 @@ memInventory (bool show)
debugBelch(" nursery : %5" FMT_Word " blocks (%6.1lf MB)\n",
nursery_blocks, MB(nursery_blocks));
debugBelch(" empty pinned : %5" FMT_Word " blocks (%6.1lf MB)\n",
- nursery_blocks, MB(free_pinned_blocks));
+ free_pinned_blocks, MB(free_pinned_blocks));
debugBelch(" retainer : %5" FMT_Word " blocks (%6.1lf MB)\n",
retainer_blocks, MB(retainer_blocks));
debugBelch(" arena blocks : %5" FMT_Word " blocks (%6.1lf MB)\n",