1 files changed, 1 insertions, 0 deletions
diff --git a/vm.c b/vm.c
index 63a8d1a7..b6ebdacb 100644
--- a/vm.c
+++ b/vm.c
@@ -815,6 +815,7 @@ NOINLINE static void vm_block(struct vm *vm, vm_word_t insn)
   uw_block_begin (vm_get(vm->dspl, blname), result);
   uw_blk.bl.cont_bottom = coerce(mem_t *, vm + 1);
   result = vm_execute(vm);
+  exitpt = vm->ip;
   uw_block_end;
 
   vm_set(vm->dspl, outreg, result);