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); }