@@ -0,0 +1,6 @@
+(defpackage trivial-gray-streams-test
+ (:use :cl :trivial-gray-streams)
+ (:shadow :method)
+ (:export #:run-tests
+ #:failed-test-names))
+
@@ -1,7 +1,3 @@
-(defpackage trivial-gray-streams-test
- (:use :cl :trivial-gray-streams)
- (:shadow :method))
-
(in-package :trivial-gray-streams-test)
;;; test framework
@@ -5,4 +5,6 @@
:depends-on (:trivial-gray-streams)
:pathname #P"test/"
:serial t
- :components ((:file "test-framework") (:file "test")))
+ :components ((:file "package")
+ (:file "test-framework")
+ (:file "test")))