clean up
This commit is contained in:
parent
8767d57fbd
commit
261580309e
|
@ -392,9 +392,7 @@ gc_mark_object(pic_state *pic, union object *obj)
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
case PIC_TT_RECORD: {
|
case PIC_TT_RECORD: {
|
||||||
struct pic_record *rec = (struct pic_record *)obj;
|
LOOP(obj->rec.data);
|
||||||
|
|
||||||
LOOP((struct pic_object *)rec->data);
|
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
case PIC_TT_SYMBOL: {
|
case PIC_TT_SYMBOL: {
|
||||||
|
|
|
@ -91,7 +91,7 @@ struct pic_state {
|
||||||
|
|
||||||
pic_code *ip;
|
pic_code *ip;
|
||||||
|
|
||||||
pic_value ptable;
|
pic_value ptable; /* list of registers */
|
||||||
|
|
||||||
struct pic_lib *lib, *prev_lib;
|
struct pic_lib *lib, *prev_lib;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue