X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=clsql-tests.asd;h=6d44b878a69569a216ff2c2f76611865605d3151;hb=67e6b9eaab9c9bcf8b57cbd476581437e4876b26;hp=d48b25eb4917400193d0ebc788be58acecd79f29;hpb=73cf858d596ad1d51c745b478292433617cf9d72;p=clsql.git diff --git a/clsql-tests.asd b/clsql-tests.asd index d48b25e..6d44b87 100644 --- a/clsql-tests.asd +++ b/clsql-tests.asd @@ -2,10 +2,10 @@ ;;;; ************************************************************************* ;;;; FILE IDENTIFICATION ;;;; -;;;; File: clsql-tests.asd -;;;; Author: Marcus Pearce -;;;; Created: 30/03/2004 -;;;; Updated: <04/04/2004 12:34:41 marcusp> +;;;; File: clsql-tests.asd +;;;; Authors: Marcus Pearce and Kevin Rosenberg +;;;; Created: 30/03/2004 +;;;; Updated: $Id$ ;;;; ;;;; $Id$ ;;;; @@ -16,15 +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." - :depends-on (clsql rt) + :depends-on (clsql clsql-classic-tests rt) :components ((:module tests :serial t @@ -36,3 +38,8 @@ (:file "test-ooddl") (:file "test-oodml") (: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")))