about summary refs log tree commit diff stats
path: root/mu.arc
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2014-12-03 18:08:42 -0800
committerKartik K. Agaram <vc@akkartik.com>2014-12-03 18:08:42 -0800
commit383a2affe43e580accd1fe739ce88dfa52af24aa (patch)
tree0a41fb7e5fb4c198ffeef5a37914fb07b58ab192 /mu.arc
parentc51da8b695c0bed7bc1b7e4281e6e89d6c8ea584 (diff)
downloadmu-383a2affe43e580accd1fe739ce88dfa52af24aa.tar.gz
391 - start fleshing out 'defer'
Diffstat (limited to 'mu.arc')
-rw-r--r--mu.arc4
1 files changed, 4 insertions, 0 deletions
diff --git a/mu.arc b/mu.arc
index ee70fa33..5deb83aa 100644
--- a/mu.arc
+++ b/mu.arc
@@ -918,6 +918,10 @@
                 (enq qinstr deferred))))))
     (accum yield
       (each instr instrs
+        (when (and acons.instr
+                   (is instr.0 'reply))
+          (each instr (as cons deferred)
+            (yield instr)))
         (unless (and acons.instr
                      (in instr.0 'defer))  ; keep sync'd with case clauses above
           (yield instr)))