;;;; *************************************************************************
;;;; FILE IDENTIFICATION
;;;;
-;;;; Name: package.lisp
-;;;; Purpose: Package definition for XLTEST
-;;;; Authors: Kevin Rosenberg and Craig Brozefsky
+;;;; ID: $Id: package.lisp,v 1.8 2003/08/04 19:31:34 kevin Exp $
+;;;; Purpose: Package definition for XLUnit
;;;;
-;;;; Put in public domain by Kevin Rosenberg and onShore, Inc
-;;;; $Id: package.lisp,v 1.1 2003/08/04 06:00:01 kevin Exp $
+;;;; $Id: package.lisp,v 1.8 2003/08/04 19:31:34 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-case.lisp
+ #:test-case
+ #:def-test-method
+ #:set-up
+ #:tear-down
+ #:run
+ #:run-test
+ #:make-test
+
+ ;; assert
+ #:assert-true
+ #:assert-false
+ #:assert-equal
+ #:assert-eql
#:test-failure
#:failure
- #:run-test
- #:def-test-fixture
- #:make-test-case
+
+ ;; 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
+ #: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)