/* ----------------------------------------------------------------------------
- * $Id: Constants.h,v 1.19 2001/11/26 16:54:22 simonmar Exp $
+ * $Id: Constants.h,v 1.21 2002/09/23 14:33:50 simonmar Exp $
*
* (c) The GHC Team, 1998-1999
*
/* You can change these constants (I hope) but be sure to modify
rts/StgMiscClosures.hs accordingly. */
-/*---- Minimum number of words left in heap after GC to carry on */
-
-#define HEAP_HWM_WORDS 1024
-
/* -----------------------------------------------------------------------------
Semi-Tagging constants
-------------------------------------------------------------------------- */
/* The size of a block (2^BLOCK_SHIFT bytes) */
-#define BLOCK_SHIFT 11
+#define BLOCK_SHIFT 12
/* The size of a megablock (2^MBLOCK_SHIFT bytes) */
#define MBLOCK_SHIFT 20