X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FBlock.h;fp=ghc%2Fincludes%2FBlock.h;h=d6bfdfe603c07ad92356289bc90cbd6a82d2c07e;hb=6f83fbc0a8b201a3d2ad20e4d8c707613d45cf2a;hp=bf21ba38a159665056abe8e2ff6fe21496bb94fe;hpb=9a6296aaa11743c44e303c82d7a4bfa34201a39e;p=ghc-hetmet.git

diff --git a/ghc/includes/Block.h b/ghc/includes/Block.h
index bf21ba3..d6bfdfe 100644
--- a/ghc/includes/Block.h
+++ b/ghc/includes/Block.h
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: Block.h,v 1.7 2000/04/05 14:26:31 panne Exp $
+ * $Id: Block.h,v 1.8 2001/07/23 10:47:16 simonmar Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -45,7 +45,7 @@ typedef struct _bdescr {
   StgPtr free;			/* first free byte of memory */
   struct _bdescr *link;		/* used for chaining blocks together */
   struct _bdescr *back;		/* used (occasionally) for doubly-linked lists*/
-  struct _generation *gen;	/* generation */
+  unsigned int gen_no;		/* generation */
   struct _step *step;		/* step */
   StgWord32 blocks;		/* no. of blocks (if grp head, 0 otherwise) */
   StgWord32 evacuated;           /* block is in to-space */