diff options
| -rw-r--r-- | mu.arc | 2 | ||||
| -rw-r--r-- | mu.arc.t | 8 |
2 files changed, 5 insertions, 5 deletions
diff --git a/mu.arc b/mu.arc index 1738e8b9..3755f4fa 100644 --- a/mu.arc +++ b/mu.arc @@ -31,7 +31,7 @@ (= (memory* oarg.0) ; hardcoded channel for now (memory* pop.fn-args)) - return + reply (= returned (annotate 'result arg)) ; else user-defined function (let results (run function*.op arg) diff --git a/mu.arc.t b/mu.arc.t index 88dbde68..ced0b92d 100644 --- a/mu.arc.t +++ b/mu.arc.t @@ -26,7 +26,7 @@ (add-fns '((add-fn (3 <- add 1 2) - (return) + (reply) (4 <- loadi 34)) (main (1 <- loadi 1) @@ -44,7 +44,7 @@ (4 <- read) (5 <- read) (3 <- add 4 5) - (return) + (reply) (4 <- loadi 34)) (main (1 <- loadi 1) @@ -64,7 +64,7 @@ (4 <- read) (5 <- read) (6 <- add 4 5) - (return 6) + (reply 6) (4 <- loadi 34)) (main (1 <- loadi 1) @@ -83,7 +83,7 @@ (4 <- read) (5 <- read) (6 <- add 4 5) - (return 6 5) + (reply 6 5) (4 <- loadi 34)) (main (1 <- loadi 1) |