Change default SQL server host

[umlisp.git] / umlisp-tests.asd

diff --git a/umlisp-tests.asd b/umlisp-tests.asd
index df85109992e827ccace1199c3e4ab56d6d4df144..7fe4832a4e3293af6d6761d0492178e32e614143 100644 (file)
--- a/umlisp-tests.asd
+++ b/umlisp-tests.asd
@@ -6,8 +6,6 @@
 ;;;; Purpose:       ASDF system definitionf for umlisp testing package
 ;;;; Author:        Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2003
-;;;;
-;;;; $Id: umlisp-tests.asd,v 1.1 2003/05/08 01:28:30 kevin Exp $
 ;;;; *************************************************************************
 
 (defpackage #:umlisp-tests-system
@@ -18,13 +16,14 @@
     :depends-on (:rt :umlisp)
     :components
     ((:module tests
+             :serial t
              :components
              ((:file "package")
-              (:file "basic" :depends-on ("package"))
-              (:file "parse" :depends-on ("package"))))))
+              (:file "init")
+              (:file "basic")
+              (:file "parse")))))
 
-(defmethod perform ((o test-op) (c (eql (find-system :umlisp-tests))))
-  (or (funcall (intern (symbol-name '#:do-tests)
-                      (find-package '#:regression-test)))
+(defmethod perform ((o test-op) (c (eql (find-system 'umlisp-tests))))
+  (or (funcall (intern (symbol-name '#:run-tests)
+                      (find-package '#:umlisp-tests)))
       (error "test-op failed")))
-