示例#1
0
void circa_dump_stack_trace(VM* vm)
{
    printf("dumping stack trace..\n");
    Block* stack_trace = circa_load_module(vm->world, "stack_trace");
    Block* dump = circa_find_function_local(stack_trace, "dump");
    VM* stackTraceVM = new_vm(dump);
    set_vm(stackTraceVM->input(0), vm);
    vm_run(stackTraceVM, NULL);
    free_vm(stackTraceVM);
}