From 5eb469440b85ab2adb7352f21fd500a80f02da66 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Wed, 27 Oct 1999 09:58:36 +0000
Subject: [PATCH] [project @ 1999-10-27 09:58:36 by simonmar] reduce block
 size to 4k

---
 ghc/includes/Constants.h |    6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/ghc/includes/Constants.h b/ghc/includes/Constants.h
index 12b6d0d..bf7c83e 100644
--- a/ghc/includes/Constants.h
+++ b/ghc/includes/Constants.h
@@ -1,5 +1,5 @@
 /* ----------------------------------------------------------------------------
- * $Id: Constants.h,v 1.6 1999/03/26 10:29:02 simonm Exp $
+ * $Id: Constants.h,v 1.7 1999/10/27 09:58:36 simonmar Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -208,8 +208,8 @@
    -------------------------------------------------------------------------- */
 
 /* The size of a block */
-#define BLOCK_SIZE   0x2000
-#define BLOCK_SHIFT  13
+#define BLOCK_SIZE   0x1000
+#define BLOCK_SHIFT  12
 
 /* The size of a megablock */
 #define MBLOCK_SIZE    0x100000
-- 
1.7.10.4