Fix PC addre in call [r1 : r2]

1 files changed, 1 insertions, 2 deletions

diff --git a/vm.c b/vm.c
index 5f4b1ce..6652e2b 100644
--- a/vm.c
+++ b/vm.c
@@ -379,8 +379,7 @@ uint8_t tr8_eval(Tr8 *vm)
 
                         vm->write_m(--vm->sp, vm->pc & 0xff);
                         vm->write_m(--vm->sp, vm->pc >> 8);
-
-                        vm->pc = vm->read_m(addr) | (vm->read_m(addr + 1) << 8);
+                        vm->pc = addr;
                     }
                 }
                 break;