bldc/tests/test_merge_14.lisp

3 lines
59 B
Common Lisp

(check (eq (merge (lambda (x y) (< x y)) '() '(1)) '(1)))