From fa901ba1621f9e47f3c952971664034a0d26481c Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Wed, 22 Nov 2006 10:16:04 +0000 Subject: [PATCH] fix bug in memInventory() giving false memory leak errors fixes ffi009(threaded1) --- rts/sm/Storage.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/rts/sm/Storage.c b/rts/sm/Storage.c index b7028d5..e4390da 100644 --- a/rts/sm/Storage.c +++ b/rts/sm/Storage.c @@ -1148,7 +1148,7 @@ memInventory(void) // count the blocks containing executable memory exec_blocks = 0; for (bd = exec_block; bd; bd = bd->link) { - exec_blocks = bd->blocks; + exec_blocks += bd->blocks; } /* count the blocks on the free list */ -- 1.7.10.4