common-lisp
इकाई का परीक्षण

फाइवएएम का उपयोग करना

पुस्तकालय लोड हो रहा है

(ql:quickload "fiveam")

एक परीक्षण मामले को परिभाषित करें

(fiveam:test sum-1
  (fiveam:is (= 3 (+ 1 2))))

;; We'll also add a failing test case
(fiveam:test sum2
  (fiveam:is (= 4 (+ 1 2))))

परीक्षण चलाएं

(fiveam:run!)

जो रिपोर्ट करता है

Running test suite NIL
 Running test SUM2 f
 Running test SUM1 .
 Did 2 checks.
    Pass: 1 (50%)
    Skip: 0 ( 0%)
    Fail: 1 (50%)
 Failure Details:
 --------------------------------
 SUM2 []: 
      
(+ 1 2)

 evaluated to 

3

 which is not 

=

 to 

4

..
 --------------------------------
NIL

टिप्पणियाँ

• टेस्ट को टेस्ट-सूट द्वारा समूहीकृत किया जाता है
• डिफॉल्ट्स द्वारा परीक्षणों को वैश्विक परीक्षण-सूट में जोड़ा जाता है

परिचय

कॉमन लिस्प में यूनिट टेस्टिंग के लिए कुछ लाइब्रेरी हैं

• FiveAM
• व्यापक परीक्षण संवाददाताओं, रंगीन आउटपुट, परीक्षण अवधि की रिपोर्ट और asdf एकीकरण जैसी कुछ अनूठी विशेषताओं के साथ साबित करें ।
• लिस्प-यूनिट 2 , जेयूनिट के समान
• Fiasco , REPL से एक अच्छा परीक्षण अनुभव प्रदान करने पर ध्यान केंद्रित कर रहा है। Hu.dwim.stefil का उत्तराधिकारी