X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2FStorage.h;fp=includes%2FStorage.h;h=c9cbd9c5e94414183da29b5d88d7e4236e69d1a1;hb=200c73fdfea734765c48309cc8dcbcf44b69c8c5;hp=90e364cbc493052eaba1a211461e26339f53b3a4;hpb=233a468745d108ea845e0898e4177df2c3734fc0;p=ghc-hetmet.git

diff --git a/includes/Storage.h b/includes/Storage.h
index 90e364c..c9cbd9c 100644
--- a/includes/Storage.h
+++ b/includes/Storage.h
@@ -69,6 +69,8 @@ typedef struct step_ {
     bdescr *             large_objects;	 // large objects (doubly linked)
     unsigned int         n_large_blocks; // no. of blocks used by large objs
 
+    StgTSO *             threads;       // threads in this step
+                                        // linked via global_link
 
     // ------------------------------------
     // Fields below are used during GC only
@@ -100,6 +102,7 @@ typedef struct step_ {
 
     bdescr *     bitmap;  		// bitmap for compacting collection
 
+    StgTSO *     old_threads;
 
 } step;