deferred:loop を接続したいと思っていろいろやってみた。 ためしみた 最初に書いたのがこれ。 (deferred:$ (deferred:loop (loop for x from 0 to 1000 collect x) (lambda () (message "%s" x))) (deferred:loop (loop for x from 1000 downto 0 collect x) (lambda () (message "%s" x))) (deferred:nextc it (lambda () (message "end")))) うまくいかない。最初のloopと次のloopが一緒に走ってる感じ。次に deferred:nextc で loop を囲んでみた。 (deferred:$ (deferred:loop (loop for x from 0 to 1