32-bit fix
authorSimon Marlow <marlowsd@gmail.com>
Wed, 13 Oct 2010 15:42:00 +0000 (15:42 +0000)
committerSimon Marlow <marlowsd@gmail.com>
Wed, 13 Oct 2010 15:42:00 +0000 (15:42 +0000)
rts/sm/MBlock.c

index b9d71f6..f5b61c6 100644 (file)
@@ -271,10 +271,12 @@ freeAllMBlocks(void)
 
     osFreeAllMBlocks();
 
+#if SIZEOF_VOID_P == 8
     for (n = 0; n < mblock_map_count; n++) {
         stgFree(mblock_maps[n]);
     }
     stgFree(mblock_maps);
+#endif
 }
 
 void