;; Run all tests in this buffer with `elk-test-run-buffer'. ;; Or evaluate, then run individual tests with `elk-test-run': (deftest "test 1" (assert-eql 5 (+ 2 3))) (deftest "test 2" (assert-equal '(x y) (list 'x 'y)) (assert-eq 'x (car '(x y)))) ;; this will fail: (deftest "test 3" (assert-equal '(x y) (list 'y 'x)))