X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=package.lisp;h=2bdfee579cdca8af427c6d83c6ad62a92b19b043;hb=e2bf8174193c9acc013b8bbbc116b7e7acc86526;hp=e935fda13fbabe7f4bb5318d19439a622ff8ff54;hpb=c7bc011f355411986f238987a4f97c93f66818dc;p=xlunit.git diff --git a/package.lisp b/package.lisp index e935fda..2bdfee5 100644 --- a/package.lisp +++ b/package.lisp @@ -2,46 +2,58 @@ ;;;; ************************************************************************* ;;;; FILE IDENTIFICATION ;;;; -;;;; Name: package.lisp -;;;; Purpose: Package definition for XLTEST -;;;; Authors: Kevin Rosenberg and Craig Brozefsky +;;;; ID: $Id: package.lisp,v 1.11 2003/08/08 00:57:20 kevin Exp $ +;;;; Purpose: Package definition for XLUnit ;;;; -;;;; Put in public domain by Kevin Rosenberg and onShore, Inc -;;;; $Id: package.lisp,v 1.2 2003/08/04 09:46:44 kevin Exp $ +;;;; $Id: package.lisp,v 1.11 2003/08/08 00:57:20 kevin Exp $ ;;;; ************************************************************************* (in-package #:cl-user) -(defpackage #:xltest-framework - (:use #:common-lisp) - (:nicknames #:xltest #:xptest) +(defpackage #:xlunit + (:use #:cl) (:export - ;;; Framework classes - #:setup - #:teardown - #:perform-test - #:test-failure - #:failure + + ;; test-case.lisp + #:test-case + #:def-test-method + #:set-up + #:tear-down + #:run #:run-test #:make-test + + ;; assert + #:assert-equal + #:assert-true + #:assert-false + #:test + #:test-error + #:test-no-error + #:test-warning + #:test-no-warning + #:failure + + ;; suite.lisp + #:textui-test-run #:make-test-suite #:setup-testsuite-named #:teardown-testsuite-named #:add-test - #:test-named + #:named-test #:remove-test #:tests - #:test-result - #:report-result - #:make-test-suite-for-fixture - #:assert-equal - #:assert-true - #:assert-false - #:test-assert - #:test-fixture - #:text-testrunner + #:get-suite + #:test-suite + #:run-on-test-results + + ;; printer.lisp #:summary + + ;; result.lisp + #:test-results + #:make-test-results + #:was-successful ) - (:documentation "This is the XP TestSuite Framework.")) + (:documentation "This is the XLUnit Framework.")) -(in-package #:xltest)