Clojure中的循环解构

Question

有没有解构循环中的recur绑定的方法？ 因此，举例来说，如果我想让y保持不变在

(loop [x 1 y 1] (if (< x 5) (recur (inc x) _) (println "result:" x y)) 

我知道这是不可能的，但我怎么能得到这样_类似的事情在连续解构为recur？

Answer 1

假设y从来没有loop内改变，你可以只是包装一切的let结合的值y，甚至把你的loop在接收y作为自变量的函数。

let

(let [y 1] 
    (loop [x 1] 
    (if (< x 5) 
     (recur (inc x)) 
     (println "result:" x y))) 

defn

(defn loop-with [y] 
    (loop [x 1] 
    (if (< x 5) 
     (recur (inc x)) 
     (println "result:" x y)))