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:
db76a30
)
Don't lose linked list tail
author
Esa Ilari Vuokko
<ei@vuokko.info>
Thu, 31 Aug 2006 22:33:15 +0000
(22:33 +0000)
committer
Esa Ilari Vuokko
<ei@vuokko.info>
Thu, 31 Aug 2006 22:33:15 +0000
(22:33 +0000)
rts/MBlock.c
patch
|
blob
|
history
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;