summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEsa Ilari Vuokko <ei@vuokko.info>2006-08-21 18:03:32 +0000
committerEsa Ilari Vuokko <ei@vuokko.info>2006-08-21 18:03:32 +0000
commitefb48d67eeb93dd81c6371b14a4f66a44714db63 (patch)
tree84660190654b2c0325c4cf425ed60c5f52ad3b67
parentaba81b16e17d8dbd3081d20e062dbc8f9e2f783b (diff)
downloadhaskell-efb48d67eeb93dd81c6371b14a4f66a44714db63.tar.gz
Remove wrong VirtualAlloc MEM_DECOMMITs on cleanup
-rw-r--r--rts/MBlock.c2
1 files changed, 0 insertions, 2 deletions
diff --git a/rts/MBlock.c b/rts/MBlock.c
index e3acea8f48..594c9166de 100644
--- a/rts/MBlock.c
+++ b/rts/MBlock.c
@@ -478,8 +478,6 @@ freeAllMBlocks(void)
block_rec* next = 0;
block_rec* it = free_blocks;
for(; it!=0; ) {
- if(!VirtualFree((void*)it->base, it->size, MEM_DECOMMIT))
- debugBelch("freeAllMBlocks: VirtualFree MEM_DECOMMIT failed with %ld", GetLastError());
next = it->next;
free(it);
it=next;