bldc/tests/test_take_3.lisp

6 lines
90 B
Common Lisp

(define ls '(1 2 3 4 5 6 7 8 9 10))
(define sub-ls (take ls 0))
(check (eq sub-ls nil))