about summary refs log tree commit diff stats
path: root/mu.arc
diff options
context:
space:
mode:
Diffstat (limited to 'mu.arc')
-rw-r--r--mu.arc5
1 files changed, 5 insertions, 0 deletions
diff --git a/mu.arc b/mu.arc
index 1c58fd8c..ac1cceb6 100644
--- a/mu.arc
+++ b/mu.arc
@@ -99,6 +99,11 @@
 ;?                   (prn "jumping to " arg.1.1)
                   (= pc (+ pc arg.1.1))  ; relies on continue still incrementing (bug)
                   (continue))
+              copy
+                (= (memory* oarg.0.1) (memory* arg.0.1))
+              deref
+                (= (memory* oarg.0.1)
+                   (memory* (memory* arg.0.1)))
               reply
                 (do (= result arg)
                     (break))