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

repair tagged-array sweep that steps too far if an alignment word was added

Browse Source 
svn: r3924
This commit is contained in:
Matthew Flatt 2006-08-02 12:36:50 +00:00
parent 8ff7cc1009
commit 1129f4e30b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/mzscheme/gc2/newgc.c
View File

@ -2533,7 +2533,7 @@ static void repair_heap(void)
struct objhead *info = (struct objhead *)start;
size_t size = info->size;
if(info->mark) {
void **tempend = (++start) + (size - 1);
void **tempend = (start++) + (size - 1);
unsigned short tag = *(unsigned short*)start;
while(start < tempend)
start += fixup_table[tag](start);