about summary refs log tree commit diff stats
path: root/mu.arc.t
diff options
context:
space:
mode:
Diffstat (limited to 'mu.arc.t')
-rw-r--r--mu.arc.t4
1 files changed, 2 insertions, 2 deletions
diff --git a/mu.arc.t b/mu.arc.t
index 4d2efd3c..9883e874 100644
--- a/mu.arc.t
+++ b/mu.arc.t
@@ -310,11 +310,11 @@
   '((main
       ((1 integer-address) <- literal 2)
       ((2 integer) <- literal 34)
-      ((3 integer) <- deref (1 integer-address)))))
+      ((3 integer) <- copy (1 integer-address deref)))))
 (run function*!main)
 ;? (prn memory*)
 (if (~iso memory* (obj 1 2  2 34  3 34))
-  (prn "F - 'deref' performs indirect addressing"))
+  (prn "F - 'copy' performs indirect addressing"))
 
 (clear)
 (add-fns