bldc/tests/test_setix_0.lisp

3 lines
60 B
Common Lisp

(check (eq (setix (list 1 2 3 4 5) 2 0) (list 1 2 0 4 5)))