有没有更简洁的方式来编写这段代码？

Question

我一直在学习 Clojure，由于我来自 Ruby，并且在获得 Java 背景之前，我在程序上思考问题。

有没有更'lispy'的方式来编写这段代码，或者这样可以吗？

(defn foo
  ([s t]
     (let [x (+ 4 (- t s))]
       (if (> 2 (if (> 6 x)
                  x
                  6)
              x)
         x
         2))))

Answer 1

在 clojure 中，与任何其他语言一样，通常最好在适用时使用内置函数。因此，由于 clojure 具有 min 和 max 函数，因此您可以将 ifs 替换为：

(max 2 (min 6 x))

如果这些函数在 clojure 的标准库中不存在，我会建议定义它们，因为将 min 和 max 的逻辑放入它们自己的函数中会产生比将它们全部放在 foo 中更好的代码功能。