fix memory-management bug in syntax-object lexical info

This commit is contained in:
Matthew Flatt 2015-03-18 04:44:27 -06:00
parent cb67ea3edf
commit eb95960e7c
2 changed files with 3 additions and 0 deletions

View File

@ -51,6 +51,7 @@ static int mark_rename_table_set_MARK(void *p, struct NewGC *gc) {
gcMARK2(rns->other_phases, gc);
gcMARK2(rns->share_marked_names, gc);
gcMARK2(rns->set_identity, gc);
gcMARK2(rns->prior_contexts, gc);
gcMARK2(rns->insp, gc);
return
gcBYTES_TO_WORDS(sizeof(Module_Renames_Set));
@ -63,6 +64,7 @@ static int mark_rename_table_set_FIXUP(void *p, struct NewGC *gc) {
gcFIXUP2(rns->other_phases, gc);
gcFIXUP2(rns->share_marked_names, gc);
gcFIXUP2(rns->set_identity, gc);
gcFIXUP2(rns->prior_contexts, gc);
gcFIXUP2(rns->insp, gc);
return
gcBYTES_TO_WORDS(sizeof(Module_Renames_Set));

View File

@ -2420,6 +2420,7 @@ mark_rename_table_set {
gcMARK2(rns->other_phases, gc);
gcMARK2(rns->share_marked_names, gc);
gcMARK2(rns->set_identity, gc);
gcMARK2(rns->prior_contexts, gc);
gcMARK2(rns->insp, gc);
size:
gcBYTES_TO_WORDS(sizeof(Module_Renames_Set));