about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2014-08-31 11:26:02 -0700
committerKartik K. Agaram <vc@akkartik.com>2014-08-31 11:26:07 -0700
commit339001ea8345f996c638159d25e3e901be11790a (patch)
tree1107ca725ff23d2c27383b33c7ae493dc06280ff
parentdba1112cd9f8d6f25675b0d30854ed3b8f235963 (diff)
downloadmu-339001ea8345f996c638159d25e3e901be11790a.tar.gz
91 - just implement ops natively to maintain momentum
-rw-r--r--mu.arc3
-rw-r--r--x.mu1
2 files changed, 4 insertions, 0 deletions
diff --git a/mu.arc b/mu.arc
index 0b13030c..07c15ffe 100644
--- a/mu.arc
+++ b/mu.arc
@@ -290,6 +290,9 @@
                     (if types*.type!array
                       (new-array type (v arg.1))
                       (new-scalar type)))
+                print
+                  (do1 nil
+                    (apply prn (map m arg)))
                 reply
                   (do (pop-stack context)
                       (if empty.context (return ninstrs))
diff --git a/x.mu b/x.mu
index 7341c5d2..1a3c3175 100644
--- a/x.mu
+++ b/x.mu
@@ -2,4 +2,5 @@
   ((x integer) <- literal 1)
   ((y integer) <- literal 3)
   ((z integer) <- add (x integer) (y integer))
+  (print (x integer) (y integer) (z integer))
 )