From 197f3cb9015b229b3e01fdc69658993abec1bc87 Mon Sep 17 00:00:00 2001 From: take_cheeze Date: Mon, 28 Apr 2014 22:12:45 +0900 Subject: Print file name and line number in codedump if available. --- src/codegen.c | 14 ++++++++++++++ 1 file changed, 14 insertions(+) (limited to 'src/codegen.c') diff --git a/src/codegen.c b/src/codegen.c index 4c9323695..f8ff029ff 100644 --- a/src/codegen.c +++ b/src/codegen.c @@ -2687,13 +2687,27 @@ codedump(mrb_state *mrb, mrb_irep *irep) int i; int ai; mrb_code c; + const char *file = NULL, *next_file; + int line; if (!irep) return; printf("irep %p nregs=%d nlocals=%d pools=%d syms=%d reps=%d\n", irep, irep->nregs, irep->nlocals, (int)irep->plen, (int)irep->slen, (int)irep->rlen); + for (i = 0; i < (int)irep->ilen; i++) { ai = mrb_gc_arena_save(mrb); + + next_file = mrb_debug_get_filename(irep, i); + if (next_file && file != next_file) { + printf("file: %s\n", next_file); + file = next_file; + } + line = mrb_debug_get_line(irep, i); + if (line != -1) { + printf("%5d ", line); + } + printf("%03d ", i); c = irep->iseq[i]; switch (GET_OPCODE(c)) { -- cgit v1.2.3