conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

pic_state is not used in pic_dump_*

This commit is contained in:
Yuichi Nishiwaki 2014-03-19 19:44:45 +09:00
parent e80c3cc60b
commit bc602aa767
3 changed files with 9 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
include/picrin/irep.h
View File

@ -72,11 +72,9 @@ struct pic_irep {
pic_value pic_analyze(pic_state *, pic_value); pic_value pic_analyze(pic_state *, pic_value);
struct pic_irep *pic_codegen(pic_state *, pic_value); struct pic_irep *pic_codegen(pic_state *, pic_value);
inline void static inline void
pic_dump_code(pic_state *pic, pic_code c) pic_dump_code(pic_code c)
{ {
UNUSED(pic);
printf("[%2d] ", c.insn); printf("[%2d] ", c.insn);
switch (c.insn) { switch (c.insn) {
case OP_NOP: case OP_NOP:
@ -184,8 +182,8 @@ pic_dump_code(pic_state *pic, pic_code c)
} }
} }
inline void static inline void
pic_dump_irep(pic_state *pic, struct pic_irep *irep) pic_dump_irep(struct pic_irep *irep)
{ {
unsigned i; unsigned i;
@ -197,11 +195,11 @@ pic_dump_irep(pic_state *pic, struct pic_irep *irep)
} }
for (i = 0; i < irep->clen; ++i) { for (i = 0; i < irep->clen; ++i) {
printf("%02x ", i); printf("%02x ", i);
pic_dump_code(pic, irep->code[i]); pic_dump_code(irep->code[i]);
} }
for (i = 0; i < irep->ilen; ++i) { for (i = 0; i < irep->ilen; ++i) {
pic_dump_irep(pic, irep->irep[i]); pic_dump_irep(irep->irep[i]);
} }
} }

2
src/codegen.c
View File

@ -1460,7 +1460,7 @@ pic_compile(pic_state *pic, pic_value obj)
irep = pic_codegen(pic, obj); irep = pic_codegen(pic, obj);
#if DEBUG #if DEBUG
fprintf(stdout, "## codegen completed\n"); fprintf(stdout, "## codegen completed\n");
pic_dump_irep(pic, irep); pic_dump_irep(irep);
#endif #endif
#if DEBUG #if DEBUG

4
src/vm.c
View File

@ -443,7 +443,7 @@ pic_apply_argv(pic_state *pic, struct pic_proc *proc, size_t argc, ...)
} }
#if VM_DEBUG #if VM_DEBUG
# define OPCODE_EXEC_HOOK pic_dump_code(pic, c) # define OPCODE_EXEC_HOOK pic_dump_code(c)
#else #else
# define OPCODE_EXEC_HOOK ((void)0) # define OPCODE_EXEC_HOOK ((void)0)
#endif #endif
@ -654,7 +654,7 @@ pic_apply(pic_state *pic, struct pic_proc *proc, pic_value argv)
puts(")"); puts(")");
if (! pic_proc_func_p(proc)) { if (! pic_proc_func_p(proc)) {
printf(" irep = "); printf(" irep = ");
pic_dump_irep(pic, proc->u.irep); pic_dump_irep(proc->u.irep);
} }
else { else {
printf(" cfunc = %p\n", (void *)proc->u.func.f); printf(" cfunc = %p\n", (void *)proc->u.func.f);