projects
/
xlunit.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r7061: initial property settings
[xlunit.git]
/
package.lisp
diff --git
a/package.lisp
b/package.lisp
index 6b58890dac78fc1cec7c4107b5edcc41fcaee129..d2cd550feb2569a9940526dd929d61407f30ddc4 100644
(file)
--- a/
package.lisp
+++ b/
package.lisp
@@
-2,10
+2,10
@@
;;;; *************************************************************************
;;;; FILE IDENTIFICATION
;;;;
;;;; *************************************************************************
;;;; FILE IDENTIFICATION
;;;;
-;;;; ID: $Id
: package.lisp,v 1.6 2003/08/04 16:13:58 kevin Exp
$
+;;;; ID: $Id$
;;;; Purpose: Package definition for XLUnit
;;;;
;;;; Purpose: Package definition for XLUnit
;;;;
-;;;; $Id
: package.lisp,v 1.6 2003/08/04 16:13:58 kevin Exp
$
+;;;; $Id$
;;;; *************************************************************************
(in-package #:cl-user)
;;;; *************************************************************************
(in-package #:cl-user)
@@
-17,17
+17,24
@@
;; test-case.lisp
#:test-case
#:def-test-method
;; test-case.lisp
#:test-case
#:def-test-method
- #:setup
- #:teardown
+ #:set-up
+ #:tear-down
+ #:run
#:run-test
#:make-test
;; assert
#:run-test
#:make-test
;; assert
- #:assert-true
- #:assert-false
#:assert-equal
#:assert-eql
#:assert-equal
#:assert-eql
- #:test-failure
+ #:assert-not-eql
+ #:assert-true
+ #:assert-false
+ #:assert-condition
+ #:test
+ #:test-error
+ #:test-no-error
+ #:test-warning
+ #:test-no-warning
#:failure
;; suite.lisp
#:failure
;; suite.lisp
@@
-36,16
+43,20
@@
#:setup-testsuite-named
#:teardown-testsuite-named
#:add-test
#:setup-testsuite-named
#:teardown-testsuite-named
#:add-test
- #:
test-named
+ #:
named-test
#:remove-test
#:tests
#:remove-test
#:tests
+ #:get-suite
+ #:suite
+ #:test-suite
+ #:run-on-test-results
;; printer.lisp
#:summary
;; result.lisp
;; printer.lisp
#:summary
;; result.lisp
- #:test-result
- #:make-test-result
+ #:test-result
s
+ #:make-test-result
s
#:was-successful
)
(:documentation "This is the XLUnit Framework."))
#:was-successful
)
(:documentation "This is the XLUnit Framework."))