91 - just implement ops natively to maintain momentum

This commit is contained in:
Kartik K. Agaram 2014-08-31 11:26:02 -07:00
parent dba1112cd9
commit 339001ea83
2 changed files with 4 additions and 0 deletions

3
mu.arc
View File

@ -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))

1
x.mu
View File

@ -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))
)