r5453: *** empty log message ***

[xlunit.git] / package.lisp

diff --git a/package.lisp b/package.lisp
index 049793c45758971d631ae49a43096e1a74622567..6b58890dac78fc1cec7c4107b5edcc41fcaee129 100644 (file)
--- a/package.lisp
+++ b/package.lisp
@@ -2,29 +2,36 @@
 ;;;; *************************************************************************
 ;;;; FILE IDENTIFICATION
 ;;;;
-;;;; Name:        package.lisp
-;;;; Purpose:     Package definition for XLTEST
-;;;; Authors:     Kevin Rosenberg and Craig Brozefsky
+;;;; ID:      $Id: package.lisp,v 1.6 2003/08/04 16:13:58 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.6 2003/08/04 16:13:58 kevin Exp $
 ;;;; *************************************************************************
 
 (in-package #:cl-user)
 
-(defpackage #:xltest-framework
-  (:use #:common-lisp)
-  (:nicknames #:xltest #:xptest)
+(defpackage #:xlunit
+  (:use #:cl)
   (:export
-     ;;; Framework classes
+   
+   ;; test-case.lisp
+   #:test-case
+   #:def-test-method
    #:setup
    #:teardown
-   #:perform-test
+   #: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
@@ -32,14 +39,14 @@
    #:test-named
    #:remove-test
    #:tests
+   
+   ;; printer.lisp
+   #:summary
+   
+   ;; result.lisp
    #:test-result
-   #:report-result
-   #:make-test-suite-for-fixture
-   #:assert-equal
-   #:assert-true
-   #:assert-false
-   #:test-assert
+   #:make-test-result
+   #:was-successful
    )
-  (:documentation "This is the XP TestSuite Framework."))
+  (:documentation "This is the XLUnit Framework."))
 
-(in-package #:xltest)