free arena objects created in main function
This commit is contained in:
parent
42dbd5fe98
commit
6bd38273d2
|
@ -34,11 +34,14 @@ main()
|
|||
int char_index;
|
||||
pic_value v;
|
||||
struct pic_proc *proc;
|
||||
int ai;
|
||||
|
||||
pic = pic_open();
|
||||
|
||||
//test_object_creation(pic);
|
||||
|
||||
ai = pic_gc_arena_preserve(pic);
|
||||
|
||||
while (1) {
|
||||
printf("> ");
|
||||
|
||||
|
@ -63,6 +66,8 @@ main()
|
|||
pic_debug(pic, v);
|
||||
|
||||
printf("\n");
|
||||
|
||||
pic_gc_arena_restore(pic, ai);
|
||||
}
|
||||
|
||||
eof:
|
||||
|
|
Loading…
Reference in New Issue