debugging gc
This commit is contained in:
parent
29c919626f
commit
a01c9fc3f1
@ -1834,6 +1834,7 @@ moo_oop_method_t moo_findmethod_noseterr (moo_t* moo, moo_oop_t receiver, moo_oo
|
||||
message.ptr = MOO_OBJ_GET_CHAR_SLOT(selector);
|
||||
message.len = MOO_OBJ_GET_SIZE(selector);
|
||||
|
||||
//MOO_DEBUG4 (moo, "XXXXXXXXXxx %p %p %O %O\n", receiver, selector, receiver, selector);
|
||||
_class = MOO_CLASSOF(moo, receiver);
|
||||
if (_class == moo->_class)
|
||||
{
|
||||
|
10
moo/lib/gc.c
10
moo/lib/gc.c
@ -852,9 +852,7 @@ static MOO_INLINE void gc_mark_root (moo_t* moo)
|
||||
|
||||
for (i = 0; i < MOO_COUNTOF(kernel_classes); i++)
|
||||
{
|
||||
moo_oop_t tmp;
|
||||
tmp = *(moo_oop_t*)((moo_uint8_t*)moo + kernel_classes[i].offset);
|
||||
gc_mark (moo, tmp);
|
||||
gc_mark (moo, *(moo_oop_t*)((moo_uint8_t*)moo + kernel_classes[i].offset));
|
||||
}
|
||||
|
||||
gc_mark (moo, (moo_oop_t)moo->sysdic);
|
||||
@ -907,7 +905,7 @@ static MOO_INLINE void gc_mark_root (moo_t* moo)
|
||||
if (cb->gc) cb->gc (moo);
|
||||
}
|
||||
|
||||
gcfin_count = move_finalizable_objects (moo); /* mark finalizable objects */
|
||||
gcfin_count = move_finalizable_objects(moo); /* mark finalizable objects */
|
||||
|
||||
if (moo->symtab)
|
||||
{
|
||||
@ -951,6 +949,8 @@ static MOO_INLINE void gc_sweep (moo_t* moo)
|
||||
/* destroy */
|
||||
if (prev) prev->next = next;
|
||||
else moo->gch = next;
|
||||
if (!moo->igniting)
|
||||
MOO_DEBUG2(moo, "** DESTROYING curr %p %O\n", curr, obj);
|
||||
moo_freemem (moo, curr);
|
||||
}
|
||||
|
||||
@ -1447,7 +1447,7 @@ static moo_oow_t move_finalizable_objects (moo_t* moo)
|
||||
}
|
||||
else
|
||||
{
|
||||
x->oop = moo_moveoop (moo, x->oop);
|
||||
x->oop = moo_moveoop(moo, x->oop);
|
||||
}
|
||||
|
||||
x = y;
|
||||
|
@ -34,7 +34,7 @@
|
||||
/* TODO: move this macro out to the build files.... */
|
||||
#define MOO_INCLUDE_COMPILER
|
||||
|
||||
/*#define MOO_ENABLE_GC_MARK_SWEEP*/
|
||||
//#define MOO_ENABLE_GC_MARK_SWEEP
|
||||
|
||||
|
||||
typedef struct moo_mod_t moo_mod_t;
|
||||
@ -1710,15 +1710,15 @@ struct moo_t
|
||||
moo_oop_semaphore_t sem_gcfin;
|
||||
int sem_gcfin_sigreq;
|
||||
|
||||
moo_oop_t* volat_stack[256]; /* stack for temporaries */
|
||||
moo_oow_t volat_count;
|
||||
|
||||
moo_oop_t* proc_map;
|
||||
moo_oow_t proc_map_capa;
|
||||
moo_oow_t proc_map_used;
|
||||
moo_ooi_t proc_map_free_first;
|
||||
moo_ooi_t proc_map_free_last;
|
||||
|
||||
moo_oop_t* volat_stack[256]; /* stack for temporaries */
|
||||
moo_oow_t volat_count;
|
||||
|
||||
/* =============================================================
|
||||
* EXECUTION REGISTERS
|
||||
* ============================================================= */
|
||||
|
Loading…
Reference in New Issue
Block a user