X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=package.lisp;h=2f0da68080b10cf79c4ceca36e58328ff8f5ecce;hb=aa1871a3e62dfee34df09ab613d8366494785d0a;hp=fc7291a14aba90f1a7598e2a913efa2209c9f8a6;hpb=34803ef0f0a02430b51382e7684f6d775d135953;p=xlunit.git

diff --git a/package.lisp b/package.lisp
index fc7291a..2f0da68 100644
--- a/package.lisp
+++ b/package.lisp
@@ -2,44 +2,58 @@
 ;;;; *************************************************************************
 ;;;; FILE IDENTIFICATION
 ;;;;
-;;;; Name:        package.lisp
-;;;; Purpose:     Package definition for XLTEST
-;;;; Authors:     Kevin Rosenberg and Craig Brozefsky
+;;;; ID:      $Id: package.lisp,v 1.10 2003/08/06 14:15:32 kevin Exp $
+;;;; Purpose: Package definition for XLUnit
 ;;;;
-;;;; $Id: package.lisp,v 1.3 2003/08/04 09:50:33 kevin Exp $
+;;;; $Id: package.lisp,v 1.10 2003/08/06 14:15:32 kevin Exp $
 ;;;; *************************************************************************
 
 (in-package #:cl-user)
 
-(defpackage #:xlunit-framework
-  (:use #:common-lisp)
-  (:nicknames #:xlunit #: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-true
+   #:assert-false
+   #:assert-equal
+   #:assert-eql
+   #:assert-not-eql
+   #:assert-condition
+   #:assert-not-condition
+   #:test-failure
+   #: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."))