suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

clear allocated freeblocks array

Browse Source 
svn: r12313
This commit is contained in:
Matthew Flatt 2008-11-05 21:51:11 +00:00
parent 6ccb6a0137
commit 2fc429a9d7
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/mzscheme/gc2/vm.c
View File

@ -35,6 +35,7 @@ static VM *vm_create() {
#if !( defined(_WIN32) || defined(OSKIT) ) #if !( defined(_WIN32) || defined(OSKIT) )
#define BLOCKFREE_CACHE_SIZE 96 #define BLOCKFREE_CACHE_SIZE 96
vm->freeblocks = ofm_malloc(sizeof(FreeBlock) * BLOCKFREE_CACHE_SIZE); vm->freeblocks = ofm_malloc(sizeof(FreeBlock) * BLOCKFREE_CACHE_SIZE);
memset(vm->freeblocks, 0, sizeof(FreeBlock) * BLOCKFREE_CACHE_SIZE);
#endif #endif
return vm; return vm;
} }