diff --git a/ghc/rts/Storage.c b/ghc/rts/Storage.c
index 88f8904910246127ccd512cddf48e7daf16214f9..ce745f6054312eb4b333daab665aaa609bf216da 100644
--- a/ghc/rts/Storage.c
+++ b/ghc/rts/Storage.c
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: Storage.c,v 1.10 1999/02/05 14:45:43 simonm Exp $
+ * $Id: Storage.c,v 1.11 1999/02/05 14:48:01 simonm Exp $
  *
  * Storage manager front end
  *
@@ -71,7 +71,7 @@ initStorage (void)
     gen->mut_once_list = END_MUT_LIST;
     gen->collections = 0;
     gen->failed_promotions = 0;
-    gen->max_blocks = RtsFlags.GcFlags.minOldGenSize;
+    gen->max_blocks = 0;
   }
 
   /* A couple of convenience pointers */