X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=clsql-tests.asd;h=6d44b878a69569a216ff2c2f76611865605d3151;hb=67e6b9eaab9c9bcf8b57cbd476581437e4876b26;hp=a9486ac3eeebacb6646de9e327ae262e96f4770a;hpb=7f0e4a65d1b425f2fa58fc7cce8296c1a6c52c2f;p=clsql.git

diff --git a/clsql-tests.asd b/clsql-tests.asd
index a9486ac..6d44b87 100644
--- a/clsql-tests.asd
+++ b/clsql-tests.asd
@@ -2,12 +2,12 @@
 ;;;; *************************************************************************
 ;;;; FILE IDENTIFICATION
 ;;;;
-;;;; File:    clsql-tests.asd
-;;;; Author:  Marcus Pearce <m.t.pearce@city.ac.uk>
-;;;; Created: 30/03/2004
-;;;; Updated: <04/04/2004 12:34:41 marcusp>
+;;;; File:     clsql-tests.asd
+;;;; Authors:  Marcus Pearce <m.t.pearce@city.ac.uk> and Kevin Rosenberg 
+;;;; Created:  30/03/2004
+;;;; Updated:  $Id$
 ;;;;
-;;;; $Id: clsql-classic.asd 8847 2004-04-07 14:38:14Z kevin $
+;;;; $Id$
 ;;;;
 ;;;; CLSQL users are granted the rights to distribute and use this software
 ;;;; as governed by the terms of the Lisp Lesser GNU Public License
@@ -16,14 +16,17 @@
 ;;;; ======================================================================
 
 (in-package #:cl-user)
+(defpackage #:clsql-tests-system (:use #:asdf #:cl))
+(in-package #:clsql-tests-system)
 
-(asdf:defsystem clsql-tests
+(defsystem clsql-tests
     :name "CLSQL Tests"
     :author ""
     :maintainer ""
     :version ""
     :licence ""
-    :description "A regression test suite for CLSQL-USQL."
+    :description "A regression test suite for CLSQL."
+    :depends-on (clsql clsql-classic-tests rt)
     :components 
     ((:module tests
 	      :serial t
@@ -34,5 +37,9 @@
 			   (:file "test-fdml")
 			   (:file "test-ooddl")
 			   (:file "test-oodml")
-			   (:file "test-syntax"))))
-    :depends-on (:clsql :rt))
+			   (:file "test-syntax")))))
+
+(defmethod perform ((o test-op) (c (eql (find-system 'clsql-tests))))
+  (unless (funcall (intern (symbol-name '#:run-tests)
+			   (find-package '#:clsql-tests)))
+    (error "test-op failed")))