bldc/tests/test_cond_5.lisp

8 lines
95 B
Common Lisp

(defun test (x)
(cond
((= x 1) 1)
(t 2)
))
(check (= 1 (test 1)))