diff --git a/core/my_basic.c b/core/my_basic.c index ba5a472..ced2612 100755 --- a/core/my_basic.c +++ b/core/my_basic.c @@ -1703,6 +1703,9 @@ static void _real_to_str(real_t r, char* str, size_t size, size_t afterpoint); default: break; \ } \ } +#ifndef _ONGC +# define _ONGC(__s, __g, __c) do { ((void)(__s)); ((void)(__g)); ((void)(__c)); } while(0) +#endif /* _ONGC */ #ifdef _HAS_REF_OBJ_LOCK static bool_t _lock_ref_object(_lock_t* lk, _ref_t* ref, void* obj); @@ -6840,6 +6843,7 @@ static void _gc_collect_garbage(mb_interpreter_t* s, int depth) { } while(1); /* Tidy */ + _ONGC(s, gc, gc->collected_table); _ht_clear(gc->collected_table); gc->valid_table = 0; _ht_clear(valid);