廣義布林
實際上,任何與 NIL 不同的值都被認為是 Common Lisp 中的真值。例如:
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 可以被認為更類似於其他語言的控制結構,而不是布林運算子。