लिस्प में एक अनौपचारिक सशर्त का उदाहरण क्या होगा?

Question

लिस्प में एक अनौपचारिक सशर्त का उदाहरण क्या होगा? कृपया कोड भी समझाएं।

Answer 1

एक उदाहरण सामान्य लिस्प LOOP है:

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

चर IT परीक्षण अभिव्यक्ति के मूल्य है। यह एएनएसआई कॉमन लिस्प LOOP सुविधा की एक विशेषता है।

उदाहरण:

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

रिटर्न

(SIN) 

क्योंकि केवल "SIN" एक मौजूदा प्रतीक है, यहाँ प्रतीक SIN के लिए एक नाम है। सामान्य लिस्प प्रतीक नामों में डिफ़ॉल्ट रूप से आंतरिक रूप से अपरकेस नाम होते हैं।

Answer 2

पॉल ग्राहम के On Lisp पर Anaphoric Macros पर एक अध्याय है।

अनिवार्य रूप से, यह दोहराए जाने वाले बयान लिखने का एक लघु तरीका है जो कोड दोहराने से बचाता है। उदाहरण के लिए, की तुलना:

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

और

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

जहां it एक विशेष नाम है कि जो कुछ सिर्फ (big-long-calculation) में गणना की गई थी के लिए संदर्भित करता है।