lisp - 复合布尔测试的 Clojure（或 Lisp）等价物

Question

在 C++ 中，我会写这样的东西：

if (a == something && b == anotherthing)
{
   foo();
}

我认为 Clojure 等价物是这样的是否正确：

(if (= a something)
    (if (= b anotherthing)
        (foo)))

还是有另一种方法来执行我错过的逻辑“和”？正如我所说，后一种形式似乎工作正常——我只是想知道是否有一些更简单的方法来执行逻辑与。在 Clojure Google Group 上搜索“boolean”、“logical”和“and”会发现太多结果，没有太多用处。

score 35 · Accepted Answer

35

在 Common Lisp 和 Scheme 中

(and (= a something) (= b another) (foo))

于 2009-02-11T03:13:32.377 回答

score 17 · Accepted Answer

在 Common Lisp 中，以下也是一个常见的习语：

(when (and (= a something) (= b another))
  (foo))

将此与 Doug Currie 使用的答案进行比较(and ... (foo))。语义是相同的，但是根据的返回类型(foo)，大多数 Common Lisp 程序员会更喜欢其中一个：

证明规则的一个例外是程序员知道这两个习语的代码，但(and ... (foo))无论如何还是故意编写的。:-)

score 8 · Accepted Answer

在 Clojure 中，我通常会使用类似的东西：

(if 
  (and (= a something) (= b anotherthing))
  (foo))

显然可以更简洁（例如 Doug 的回答），但我认为这种方法更适合人们阅读 - 特别是如果代码的未来读者具有 C++ 或 Java 背景！

score 2 · Accepted Answer

这真的很酷！(and x y)是一个宏——您可以在 clojure.org 上查看源代码——它扩展为(if x y false)等价于：

if (x) {
  if (y) {
    ...
  }
} else {
  false
}

(or x y)相似但相反。

4 回答 4