Lisp'de anaporik koşullara bir örnek ne olurdu?

Question

Lisp'de anaporik koşullara bir örnek ne olurdu? Lütfen kodu da açıklayınız.

Answer 1

bir örneği, ortak Lisp LOOP olup:

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

değişken IT Test ifadesinin değeri vardır. Bu, ANSI Common Lisp LOOP özelliğinin bir özelliğidir.

Örnek:

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

döner

(SIN) 

sadece "SIN" varolan sembol, burada sembol SIN için bir isimdir çünkü. Ortak Lisp sembol adlarında, varsayılan olarak dahili büyük harf adları vardır.

Answer 2

Paul Graham'ın On Lisp bölümünün Anaphoric Macros üzerinde bir bölümü vardır.

Aslında, bu kod yinelenen kaçınan ifadeleri yazmak için kısa yoludur. Örneğin, karşılaştırma:

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

ve it sadece (big-long-calculation) yılında hesaplandı ne başvuran bir özel addır

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

.