摘要:
找Clojure中一些常用宏的实现可以在GitHub中找到一些常用宏的实现一个自定义延迟序列的例子看到这么个例子:(defn recur-fibo [n] (letfn [(fib [current next n] (if (zero? n) current (recur next (+ current next) (dec n))))] (fib 0 1 n))) 使用LazySeq后:(defn lazy-seq-fibo ([] (concat [0 1] (lazy-seq-fibo 0 1))) ([a b] (let [n (+ a b)] (lazy-s... 阅读全文
posted @ 2013-01-31 21:26
冰激淋
阅读(355)
评论(0)
推荐(0)