cleanup

include/picrin/irep.h

@@ -54,4 +54,6 @@ struct pic_irep {
   bool varg;
 };
 
+void print_irep(pic_state *, struct pic_irep *);
+
 #endif

src/codegen.c

@@ -94,8 +94,6 @@ new_irep(pic_state *pic)
   return irep;
 }
 
-static void print_irep(pic_state *, struct pic_irep *);
-
 typedef struct codegen_state {
   pic_state *pic;
   codegen_scope *scope;
@@ -698,7 +696,7 @@ pic_defun(pic_state *pic, const char *name, pic_func_t cfunc)
   pic->globals[idx] = pic_obj_value(proc);
 }
 
-static void
+void
 print_irep(pic_state *pic, struct pic_irep *irep)
 {
   int i;

src/gc.c

@@ -386,7 +386,7 @@ gc_sweep_phase(pic_state *pic)
 void
 pic_gc_run(pic_state *pic)
 {
-#if GC_DEBUG
+#if DEBUG
   puts("gc run!");
 #endif
   gc_mark_phase(pic);