remove flags from irep

This commit is contained in:
Yukihiro Matsumoto
2012-08-29 11:45:36 +09:00
parent 4848c1f0c7
commit 950204bc4d
6 changed files with 8 additions and 11 deletions
+7
View File
@@ -284,15 +284,22 @@ mrb_init_heap(mrb_state *mrb)
#endif
}
static void obj_free(mrb_state *mrb, struct RBasic *obj);
void
mrb_free_heap(mrb_state *mrb)
{
struct heap_page *page = mrb->heaps;
struct heap_page *tmp;
RVALUE *p, *e;
while (page) {
tmp = page;
page = page->next;
for (p = tmp->objects, e=p+MRB_HEAP_PAGE_SIZE; p<e; p++) {
if (p->as.free.tt != MRB_TT_FREE)
obj_free(mrb, &p->as.basic);
}
mrb_free(mrb, tmp);
}
}