1 files changed, 12 insertions, 0 deletions
diff --git a/mu.arc.t b/mu.arc.t
index c9808072..f657bf6b 100644
--- a/mu.arc.t
+++ b/mu.arc.t
@@ -139,3 +139,15 @@
 ;? (prn memory*)
 (if (~iso memory* (obj 1 8  2 3  3 2  4 2))
   (prn "F - idiv works"))
+
+(clear)
+(add-fns
+  '((main
+      ((integer 1) <- loadi 8)
+      (jmp (location 3))
+      ((integer 2) <- loadi 3)
+      (reply))))
+(run function*!main)
+;? (prn memory*)
+(if (~iso memory* (obj 1 8))
+  (prn "F - jmp works"))