:bug: Fix handle()

diff --git a/src/vm/vm.c b/src/vm/vm.c
index d16bebf2e0207ba19f04818a3dbc85ca43acd73c..931671b596e58e519ec3dd02133494280572729f 100644 (file)
--- a/src/vm/vm.c
+++ b/src/vm/vm.c
@@ -80,7 +80,7 @@ ANN static bool unwind(VM_Shred shred, const Symbol effect, const m_uint size) {
   if(shred->mem == (m_bit*)shred + sizeof(struct VM_Shred_) + SIZEOF_REG)
     return true;
   shred_unwind(shred);
-  return unwind(shred, effect, size - 2);
+  return unwind(shred, effect, size - 1);
 }
 
 ANN static void trace(VM_Shred shred, const m_uint size) {