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

GC - add sanity check default case

Browse Source
This commit is contained in:
Kevin Tew 2010-04-26 14:25:39 -06:00
parent c56fb66fa0
commit ac8aa01a48
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/racket/gc2/newgc.c
View File

@ -3280,6 +3280,10 @@ static void repair_heap(NewGC *gc)
break; break;
case PAGE_ATOMIC: case PAGE_ATOMIC:
start += info->size; start += info->size;
break;
default:
printf("Unhandled info->type %i\n", info->type);
abort();
} }
info->mark = 0; info->mark = 0;
#ifdef MZ_USE_PLACES #ifdef MZ_USE_PLACES