VM: fixes 'raise'

2014-07-10 00:59:00 +02:00 · 2014-07-10 00:59:00 +02:00 · 44353c585f
commit 44353c585f
parent 47fb8d8e6d
1 changed files with 2 additions and 2 deletions
--- a/compiler/vm.nim
+++ b/compiler/vm.nim
@ -902,10 +902,10 @@ proc rawExecute(c: PCtx, start: int, tos: PStackFrame): TFullReg =
      c.exceptionInstr = pc
      let (newPc, newTos) = cleanUpOnException(c, tos)
      # -1 because of the following 'inc'
-      if pc-1 < 0:
+      if newPc-1 < 0:
        bailOut(c, tos)
        return
-      pc = newPc -1
+      pc = newPc-1
      if tos != newTos:
        tos = newTos
        move(regs, tos.slots)