about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2014-12-13 02:26:53 -0800
committerKartik K. Agaram <vc@akkartik.com>2014-12-13 02:26:53 -0800
commit0cda03159de39c6905608bfd05a12fef38a1a80d (patch)
tree8b3fff12be7530e17e5725bca969cb6f620ed7fb
parent287c52140fb7fbf36af1c63cb7ea97ed3887421f (diff)
downloadmu-0cda03159de39c6905608bfd05a12fef38a1a80d.tar.gz
410
-rw-r--r--mu.arc10
1 files changed, 6 insertions, 4 deletions
diff --git a/mu.arc b/mu.arc
index d302b462..190df44e 100644
--- a/mu.arc
+++ b/mu.arc
@@ -1377,10 +1377,12 @@
               (tokens string.arg #\/)))))
 
 (def tokenize-args (instrs)
-  (map [if atom._
-         _
-         (map tokenize-arg _)]
-       instrs))
+  (accum yield
+    (each instr instrs
+      (if atom.instr
+            (yield instr)
+          :else
+            (yield (map tokenize-arg instr))))))
 
 ;; test helpers