1 /* -----------------------------------------------------------------------------
3 * (c) The GHC Team, 1998-1999
5 * Block Allocator Interface
7 * ---------------------------------------------------------------------------*/
12 /* Debugging -------------------------------------------------------------- */
15 extern void checkFreeListSanity(void);
16 nat countFreeList(void);
19 lnat n_alloc_blocks; // currently allocated blocks
20 lnat hw_alloc_blocks; // high-water allocated blocks
22 #endif /* BLOCK_ALLOC_H */