[bugfix] old proc#cfunc_p property remained in debug block

This commit is contained in:
Yuichi Nishiwaki 2014-02-27 22:00:48 +09:00
parent 8586dc9057
commit 7a1c04f1fa
1 changed files with 2 additions and 2 deletions

View File

@ -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]); pic_debug(pic, pic->sp[-c.u.i + i]);
} }
puts(")"); puts(")");
if (! proc->cfunc_p) { if (! pic_proc_func_p(proc)) {
printf(" irep = "); printf(" irep = ");
pic_dump_irep(pic, proc->u.irep); pic_dump_irep(pic, proc->u.irep);
} }
else { else {
printf(" cfunc = %p\n", (void *)proc->u.cfunc); printf(" cfunc = %p\n", (void *)proc->u.func.f);
} }
puts("== end\n"); puts("== end\n");
#endif #endif