Clojure：相当于Common Lisp中的“do”的等价物

Question

Clojure：相当于Common Lisp中的“do”的等价物

clojurelispcommon-lisp

3

作为新手，我想请问一下：Clojure中与Common Lisp的do相对应的是什么？

- albusshin

1个回答

网页内容由stack overflow 提供, 点击上面的

可以查看英文原文，
原文链接

- noisesmith · Accepted Answer

Clojure避免使用这种顺序绑定形式，但是相同的功能可以用while或loop表达——每个样式中来自CLHS的第一个示例：

;; common lisp version
(do ((temp-one 1 (1+ temp-one))
       (temp-two 0 (1- temp-two)))
      ((> (- temp-one temp-two) 5) temp-one)) =>  4

;; clojure, while
(let [temp-one (atom 1)
      temp-two (atom 0)]
  (while (> (- @temp-one @temp-two) 5)
     (swap! temp-one inc)
     (swap! temp-two dec))
  @temp-one)

;; clojure, loop
(loop [temp-one 1 temp-two 0]
  (if (> (- temp-one temp-two) 5)
    temp-one
    (recur (inc temp-one) (dec temp-two))))