- #:setup
- #:teardown
- #:perform-test
- #:test-failure
- #:failure
- #:run-test
- #:def-test-fixture
- #:make-test-case
- #:make-test-suite
- #:setup-testsuite-named
- #:teardown-testsuite-named
- #:add-test
- #:test-named
- #:remove-test
- #:tests
- #:test-result
- #:report-result
- )
- (:documentation "This is the XP TestSuite Framework."))
-
- (defpackage :xp-test-example
- (:use #:common-lisp #:xp-test)
- (:export
- #:math-test-suite))
- )
+ #:setup
+ #:teardown
+ #:perform-test
+ #:test-failure
+ #:failure
+ #:run-test
+ #:def-test-fixture
+ #:make-test-case
+ #:make-test-suite
+ #:setup-testsuite-named
+ #:teardown-testsuite-named
+ #:add-test
+ #:test-named
+ #:remove-test
+ #:tests
+ #:test-result
+ #:report-result
+ )
+ (:documentation "This is the XP TestSuite Framework."))