什麼是Lisp中的一種有條件的示例？

Question

什麼是Lisp中的一個有條件的例子？請解釋代碼。

Answer 1

一個例子是Common Lisp的LOOP：

(loop for item in list 
     when (general-predicate item) 
     collect it) 

可變IT具有測試表達式的值。這是ANSI Common Lisp LOOP設施的一項功能。

實施例：

(loop for s in '("sin" "Sin" "SIN") 
     when (find-symbol s) 
     collect it) 

返回

(SIN) 

因爲只有"SIN"爲現有符號，這裏的符號SIN的名稱。在默認情況下，Common Lisp符號名稱具有內部大寫名稱。

Answer 2

Paul Graham的On Lisp有一章Anaphoric Macros。

從本質上講，它是避免重複代碼的簡短寫法語句。例如，比較：

(let ((result (big-long-calculation))) 
    (if result 
     (foo result))) 

和

(if (big-long-calculation) 
    (foo it)) 

其中it是指無論在(big-long-calculation)剛剛計算出一個特別的名字。