summaryrefslogtreecommitdiff
path: root/rts/sm/GC.h
diff options
context:
space:
mode:
authorSimon Marlow <simonmarhaskell@gmail.com>2008-04-16 22:13:31 +0000
committerSimon Marlow <simonmarhaskell@gmail.com>2008-04-16 22:13:31 +0000
commit12c1559835a971b49042929b77c41ae6c3f8360b (patch)
tree697b4f25eed92993cb2f0d9ca434521d1b1e409e /rts/sm/GC.h
parenta75a8790410ce3ffb439bfd0b7c3999e7df72eb1 (diff)
downloadhaskell-12c1559835a971b49042929b77c41ae6c3f8360b.tar.gz
move the scan block pointer into the gct structure
Diffstat (limited to 'rts/sm/GC.h')
-rw-r--r--rts/sm/GC.h6
1 files changed, 3 insertions, 3 deletions
diff --git a/rts/sm/GC.h b/rts/sm/GC.h
index 0e0d90a48e..62a4872f2b 100644
--- a/rts/sm/GC.h
+++ b/rts/sm/GC.h
@@ -76,9 +76,6 @@ typedef struct step_workspace_ {
step * step; // the step for this workspace
struct gc_thread_ * gct; // the gc_thread that contains this workspace
- // block that is currently being scanned
- bdescr * scan_bd;
-
// where objects to be scavenged go
bdescr * todo_bd;
StgPtr todo_free; // free ptr for todo_bd
@@ -128,6 +125,9 @@ typedef struct gc_thread_ {
lnat gc_count; // number of GCs this thread has done
+ // block that is currently being scanned
+ bdescr * scan_bd;
+
// --------------------
// evacuate flags