about summary refs log blame commit diff stats
path: root/mu.arc.t
blob: 85dd1cc5c2eda78ef3e2af8c77cc4d85ed441a51 (plain) (tree)
1
2
3
4
5
6
7
8
9
10

               

                 

                

                     

                                             
(load "mu.arc")

(clear)
(add-fns '((test1
  (1 <- loadi 1)
  (2 <- loadi 3)
  (3 <- add 1 2))))
(run function*!test1)
(if (~iso memory* (obj 1 1  2 3  3 4))
  (prn "F - load and add instructions work"))