From 7a1c04f1fa0611e79129ad0bce3a114371930790 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Thu, 27 Feb 2014 22:00:48 +0900
Subject: [PATCH] [bugfix] old proc#cfunc_p property remained in debug block

---
 src/vm.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/vm.c b/src/vm.c
index b483841e..6b88dc73 100644
--- a/src/vm.c
+++ b/src/vm.c
@@ -574,12 +574,12 @@ pic_apply(pic_state *pic, struct pic_proc *proc, pic_value argv)
         pic_debug(pic, pic->sp[-c.u.i + i]);
       }
       puts(")");
-      if (! proc->cfunc_p) {
+      if (! pic_proc_func_p(proc)) {
 	printf("  irep = ");
 	pic_dump_irep(pic, proc->u.irep);
       }
       else {
-	printf("  cfunc = %p\n", (void *)proc->u.cfunc);
+	printf("  cfunc = %p\n", (void *)proc->u.func.f);
       }
       puts("== end\n");
 #endif