projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Don't traverse the entire list of threads on every GC (phase 1)
[ghc-hetmet.git]
/
includes
/
Storage.h
diff --git
a/includes/Storage.h
b/includes/Storage.h
index
90e364c
..
c9cbd9c
100644
(file)
--- 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
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
// ------------------------------------
// Fields below are used during GC only
@@
-100,6
+102,7
@@
typedef struct step_ {
bdescr * bitmap; // bitmap for compacting collection
bdescr * bitmap; // bitmap for compacting collection
+ StgTSO * old_threads;
} step;
} step;