add gc stress test

This commit is contained in:
Yuichi Nishiwaki 2013-10-29 16:40:25 +09:00
parent 35bbd66812
commit a0a8a94abc
2 changed files with 5 additions and 0 deletions

View File

@ -19,6 +19,7 @@
/* enable all debug flags */
#define DEBUG 1
#define GC_STRESS 1
#if DEBUG
# define GC_DEBUG 1

View File

@ -398,6 +398,10 @@ pic_obj_alloc(pic_state *pic, size_t size, enum pic_tt tt)
{
struct pic_object *obj;
#if GC_STRESS
pic_gc_run(pic);
#endif
obj = (struct pic_object *)gc_alloc(pic, size);
if (obj == NULL) {
pic_gc_run(pic);