diff options
author | Simon Marlow <simonmarhaskell@gmail.com> | 2008-04-16 22:13:31 +0000 |
---|---|---|
committer | Simon Marlow <simonmarhaskell@gmail.com> | 2008-04-16 22:13:31 +0000 |
commit | 12c1559835a971b49042929b77c41ae6c3f8360b (patch) | |
tree | 697b4f25eed92993cb2f0d9ca434521d1b1e409e /rts/sm/GC.h | |
parent | a75a8790410ce3ffb439bfd0b7c3999e7df72eb1 (diff) | |
download | haskell-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.h | 6 |
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 |