X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2FBlock.h;h=e2e691ab0e17db80981f5fc923b3b5a47eab9756;hb=e686d8dc6cd67c35132059d0718d1501f0af1e67;hp=112092c5c448eb3a0f38df85b35f30cdfa9e6109;hpb=fac738e582dcaca1575f5291c83910db01d25284;p=ghc-hetmet.git

diff --git a/includes/Block.h b/includes/Block.h
index 112092c..e2e691a 100644
--- a/includes/Block.h
+++ b/includes/Block.h
@@ -54,6 +54,7 @@ typedef struct bdescr_ {
   union { 
       struct bdescr_ *back;	/* used (occasionally) for doubly-linked lists*/
       StgWord *bitmap;
+      StgPtr  scan;             /* scan pointer for copying GC */
   } u;
   unsigned int gen_no;		/* generation */
   struct step_ *step;		/* step */