projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Correct the Cabal version number and remove features.
[ghc-hetmet.git]
/
rts
/
MBlock.c
diff --git
a/rts/MBlock.c
b/rts/MBlock.c
index
edde679
..
c886fd5
100644
(file)
--- a/
rts/MBlock.c
+++ b/
rts/MBlock.c
@@
-408,7
+408,7
@@
findFreeBlocks(nat n) {
if( (((unsigned long)it->base) & MBLOCK_MASK) == 0) { /* MBlock aligned */
ret = (void*)it->base;
if(it->size==required_size) {
- prev->next=0;
+ prev->next=it->next;
stgFree(it);
} else {
it->base += required_size;