projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
2fb3d02
)
calcNeeded: add in the large blocks too
author
simonmar@microsoft.com
<unknown>
Wed, 30 Jan 2008 13:54:18 +0000
(13:54 +0000)
committer
simonmar@microsoft.com
<unknown>
Wed, 30 Jan 2008 13:54:18 +0000
(13:54 +0000)
rts/sm/Storage.c
patch
|
blob
|
history
diff --git
a/rts/sm/Storage.c
b/rts/sm/Storage.c
index
a14fe05
..
0bc15c0
100644
(file)
--- a/
rts/sm/Storage.c
+++ b/
rts/sm/Storage.c
@@
-1003,9
+1003,9
@@
calcNeeded(void)
generations[g].steps[0].n_large_blocks
> generations[g].max_blocks
&& stp->is_compacted == 0) {
generations[g].steps[0].n_large_blocks
> generations[g].max_blocks
&& stp->is_compacted == 0) {
- needed += 2 * stp->n_blocks;
+ needed += 2 * stp->n_blocks + stp->n_large_blocks;
} else {
} else {
- needed += stp->n_blocks;
+ needed += stp->n_blocks + stp->n_large_blocks;
}
}
}
}
}
}