common-lisp 广义布尔

示例

实际上,任何与Common Lisp中的值不同的值都NIL被视为真实值。例如:

CL-USER> (let ((a (+ 2 2)))

           (if a

               a

               "Oh my! 2 + 2 is equal to NIL!"))

4

可将此事实与布尔运算符结合使用,以使程序更简洁。例如,上面的示例等效于:

CL-USER> (or (+ 2 2) "Oh my! 2 + 2 is equal to NIL!")

4

宏OR按从左到右的顺序评估其参数,并在找到非NIL值后立即停止并返回。如果所有参数都为NIL,则返回的值为NIL:

CL-USER> (or (= 1 2) (= 3 4) (= 5 6))

NIL

类似地,AND如果所有参数都被评估为非NIL,则宏从左到右评估其参数,并返回最后一个参数的值,否则,一旦发现NIL,立即停止评估,并返回:

CL-USER> (let ((a 2)

               (b 3))

           (and (/= b 0) (/ a b)))

2/3

CL-USER> (let ((a 2)

               (b 0))

           (and (/= b 0) (/ a b)))

NIL

由于这些原因,AND并且OR可以被认为是更类似于其他语言的控制结构,而不是布尔运算符。

以上是 common-lisp 广义布尔 的全部内容, 来源链接: utcz.com/z/326253.html

回到顶部