Stefil is a great and simple test framework in lisp.
Read about here or scroll down for a simple example demonstrating just few features.
Unfortunately, as of writing date (April, 2013) it's more or less abandoned (the new home is akwardly down). This github fork is an attempt to revive it and add some useful features.
This assumes you're using a recent version of quicklisp
> (push "path/to/stefils/parent/dir" quicklisp:*local-project-directories*)
> (ql:quickload :stefil)
or alternatively, just use asdf
> (push "path/to/stefils/dir" asdf:*central-registry*)
> (asdf:require-system :asdf)
now create some lisp file with
(stefil:define-test-package :stefil-examples)
(in-package :stefil-examples)
(defun seconds (hours-and-minutes)
(+ (* 3600 (first hours-and-minutes))
(* 60 (seconds hours-and-minutes))))
(defun hours-and-minutes (seconds)
(list (truncate seconds 3600)
(truncate seconds 60)))
(deftest test-conversion-to-hours-and-minutes ()
(is (equal (hours-and-minutes 180) '(0 3)))
(is (equal (hours-and-minutes 4500) '(1 15))))
(deftest test-conversion-to-seconds ()
(is (= 60 (seconds '(0 1))))
(is (= 4500 (seconds '(1 15)))))
(deftest double-conversion ()
(is (= 3600 (seconds (hours-and-minutes 3600))))
(is (= 1234 (seconds (hours-and-minutes 1234)))))
load or compile it, and in your REPL run
> (stefil-examples:run-package-tests)
STEFIL-EXAMPLES (Suite)
TEST-CONVERSION-TO-SECONDS [FAIL]
TEST-CONVERSION-TO-HOURS-AND-MINUTES [FAIL]
DOUBLE-CONVERSION [FAIL]
Test failures:
Failure 1: UNEXPECTED-ERROR when running STEFIL-EXAMPLES::TEST-CONVERSION-TO-SECONDS
Stack overflow (signal 1000)
Failure 2: FAILED-ASSERTION when running STEFIL-EXAMPLES::TEST-CONVERSION-TO-HOURS-AND-MINUTES
Binary predicate (EQUAL X Y) failed.
x: (STEFIL-EXAMPLES::HOURS-AND-MINUTES 4500) => (1 75)
y: '(1 15) => (1 15)
Failure 3: UNEXPECTED-ERROR when running STEFIL-EXAMPLES::DOUBLE-CONVERSION
Stack overflow (signal 1000)
#<test-run: 4 tests, 4 assertions, 3 failures in 0.031 sec (1 failed assertion, 2 errors, none expected)>
Yay, everything fails!
Run with :interactive t to bring up the lisp debugger every time a test
failure (lisp error or assertion failure). This allows us to
see that the the stack overflow erros are due to a typo (seconds should be
second in line 6) and that hours-and-minutes should be rewritten like
(defun hours-and-minutes (seconds)
(list (truncate seconds 3600)
(/ (rem seconds 3600) 60)))
After that, you'll see a nice
> (stefil-examples:run-package-tests)
STEFIL-EXAMPLES (Suite)
TEST-CONVERSION-TO-SECONDS [ OK ]
TEST-CONVERSION-TO-HOURS-AND-MINUTES [ OK ]
DOUBLE-CONVERSION [ OK ]
#<test-run: 4 tests, 6 assertions, 0 failures in 0.0 sec>
Reach us via the stefil-devel mailing list or the #lisp IRC channel.
React
Typescript
Django
Laravel
Facebook
Microsoft
Google
Alibaba
D3
Tencent