projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
GC refactoring, remove "steps"
[ghc-hetmet.git]
/
rts
/
sm
/
Storage.h
diff --git
a/rts/sm/Storage.h
b/rts/sm/Storage.h
index
02f5637
..
6dbccd8
100644
(file)
--- a/
rts/sm/Storage.h
+++ b/
rts/sm/Storage.h
@@
-29,7
+29,7
@@
INLINE_HEADER rtsBool
doYouWantToGC( Capability *cap )
{
return (cap->r.rCurrentNursery->link == NULL ||
doYouWantToGC( Capability *cap )
{
return (cap->r.rCurrentNursery->link == NULL ||
- cap->r.rNursery->n_large_blocks >= alloc_blocks_lim);
+ g0->n_large_blocks >= alloc_blocks_lim);
}
/* for splitting blocks groups in two */
}
/* for splitting blocks groups in two */
@@
-121,7
+121,7
@@
void dirty_MVAR(StgRegTable *reg, StgClosure *p);
Nursery manipulation
-------------------------------------------------------------------------- */
Nursery manipulation
-------------------------------------------------------------------------- */
-extern step *nurseries;
+extern nursery *nurseries;
void resetNurseries ( void );
void resizeNurseries ( nat blocks );
void resetNurseries ( void );
void resizeNurseries ( nat blocks );