From 9a42dd1c3a2100cca919ef3e2314c91757542fb7 Mon Sep 17 00:00:00 2001 From: "Wolfgang (Blub) Bumiller" Date: Sun, 11 Nov 2012 23:57:42 +0100 Subject: [PATCH] qcvm -trace now shows the current function name and nest-depth --- exec.c | 17 +++++++++++++++++ gmqcc.h | 2 ++ 2 files changed, 19 insertions(+) diff --git a/exec.c b/exec.c index c90444a..724ff78 100644 --- a/exec.c +++ b/exec.c @@ -50,6 +50,8 @@ MEM_VEC_FUN_RESIZE(qc_program, size_t, profile) MEM_VEC_FUNCTIONS(qc_program, prog_builtin, builtins) +MEM_VEC_FUNCTIONS(qc_program, const char*, function_stack) + static void loaderror(const char *fmt, ...) { int err = errno; @@ -417,6 +419,12 @@ static void prog_print_statement(qc_program *prog, prog_section_statement *st) printf("\n", st->opcode); return; } + if ((prog->xflags & VMXF_TRACE) && prog->function_stack_count) { + size_t i; + for (i = 0; i < prog->function_stack_count; ++i) + printf("->"); + printf("%s:", prog->function_stack[prog->function_stack_count-1]); + } printf(" <> %-12s", asm_instr[st->opcode].m); if (st->opcode >= INSTR_IF && st->opcode <= INSTR_IFNOT) @@ -514,6 +522,10 @@ static qcint prog_enterfunction(qc_program *prog, prog_section_function *func) st.stmt = prog->statement; st.function = func; + if (prog->xflags & VMXF_TRACE) { + (void)!qc_program_function_stack_add(prog, prog_getstring(prog, func->name)); + } + #ifdef QCVM_BACKUP_STRATEGY_CALLER_VARS if (prog->stack_count) { @@ -566,6 +578,11 @@ static qcint prog_leavefunction(qc_program *prog) qc_exec_stack st = prog->stack[prog->stack_count-1]; + if (prog->xflags & VMXF_TRACE) { + if (prog->function_stack_count) + prog->function_stack_count--; + } + #ifdef QCVM_BACKUP_STRATEGY_CALLER_VARS if (prog->stack_count > 1) { prev = prog->stack[prog->stack_count-2].function; diff --git a/gmqcc.h b/gmqcc.h index 304cdaa..ef1841f 100644 --- a/gmqcc.h +++ b/gmqcc.h @@ -876,6 +876,8 @@ typedef struct qc_program_s { MEM_VECTOR_MAKE(qcint, entitydata); MEM_VECTOR_MAKE(bool, entitypool); + MEM_VECTOR_MAKE(const char*, function_stack); + uint16_t crc16; size_t tempstring_start;