X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FMBlock.h;h=14244dcef3c593fc962a1c2146cedc0eafc3fa10;hb=43a120b706a5eece6624ca4907af89fc9a480c5e;hp=ecce6f81d9d0b5f6de2707b65e94c737022c414f;hpb=73637ad66b7f88e57dcd0e0ea93b3d7bf8fb0d78;p=ghc-hetmet.git

diff --git a/rts/sm/MBlock.h b/rts/sm/MBlock.h
index ecce6f8..14244dc 100644
--- a/rts/sm/MBlock.h
+++ b/rts/sm/MBlock.h
@@ -1,6 +1,6 @@
 /* -----------------------------------------------------------------------------
  *
- * (c) The GHC Team, 1998-2005
+ * (c) The GHC Team, 1998-2008
  *
  * MegaBlock Allocator interface.
  *
@@ -16,6 +16,11 @@ extern void * getMBlock(void);
 extern void * getMBlocks(nat n);
 extern void freeAllMBlocks(void);
 
+#ifdef DEBUG
+extern void *getFirstMBlock(void);
+extern void *getNextMBlock(void *mblock);
+#endif
+
 /* -----------------------------------------------------------------------------
    The HEAP_ALLOCED() test.