r10077: * multiple: Apply patch from Joerg Hoehle with multiple

[clsql.git] / clsql-tests.asd

diff --git a/clsql-tests.asd b/clsql-tests.asd
index 6d44b878a69569a216ff2c2f76611865605d3151..9d4df2f67e4c223ce5c13b7b7fedfdf77915a0b6 100644 (file)
--- a/clsql-tests.asd
+++ b/clsql-tests.asd
@@ -7,13 +7,12 @@
 ;;;; Created:  30/03/2004
 ;;;; Updated:  $Id$
 ;;;;
-;;;; $Id$
+;;;; This file is part of CLSQL.
 ;;;;
 ;;;; CLSQL users are granted the rights to distribute and use this software
 ;;;; as governed by the terms of the Lisp Lesser GNU Public License
 ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
 ;;;; *************************************************************************
-;;;; ======================================================================
 
 (in-package #:cl-user)
 (defpackage #:clsql-tests-system (:use #:asdf #:cl))
@@ -26,12 +25,17 @@
     :version ""
     :licence ""
     :description "A regression test suite for CLSQL."
-    :depends-on (clsql clsql-classic-tests rt)
+    :depends-on (clsql rt)
     :components 
     ((:module tests
              :serial t
              :components ((:file "package")
+                          (:file "utils")
                           (:file "test-init")
+                          (:file "benchmarks")
+                          (:file "test-internal")
+                          (:file "test-basic")
+                          (:file "test-time")
                           (:file "test-connection")
                           (:file "test-fddl")
                           (:file "test-fdml")
@@ -40,6 +44,7 @@
                           (:file "test-syntax")))))
 
 (defmethod perform ((o test-op) (c (eql (find-system 'clsql-tests))))
+  (operate 'load-op 'clsql)
   (unless (funcall (intern (symbol-name '#:run-tests)
                           (find-package '#:clsql-tests)))
     (error "test-op failed")))