From: Kevin M. Rosenberg <kevin@rosenberg.net>
Date: Thu, 1 Oct 2020 16:38:25 +0000 (-0600)
Subject: Use modern ASDF test-op
X-Git-Tag: v6.7.1~3
X-Git-Url: http://git.kpe.io/?p=clsql.git;a=commitdiff_plain;h=d29eb47a478a8f55c765e4d28df3f5af0147ea70

Use modern ASDF test-op
---

diff --git a/clsql.asd b/clsql.asd
index 4f00950..37263ce 100644
--- a/clsql.asd
+++ b/clsql.asd
@@ -94,12 +94,8 @@ oriented interface."
 				     (:file "generic-odbc")
 				     (:file "sequences")
 				     (:file "command-object"))
-			:depends-on (functional))))))
-
-
-(defmethod perform ((o test-op) (c (eql (find-system 'clsql))))
-  (operate 'load-op 'clsql-tests)
-  (operate 'test-op 'clsql-tests :force t))
+			:depends-on (functional)))))
+    :in-order-to ((test-op (test-op "clsql-tests"))))
 
 (defmethod perform :after ((o load-op) (c (eql (find-system 'clsql))))
   (let* ((init-var (uffi::getenv "CLSQLINIT"))
@@ -112,4 +108,3 @@ oriented interface."
                         #+(or mswin windows win32 win64 mswindows)
                         (probe-file "c:\\etc\\clsql-init.lisp"))))
     (when init-file (load init-file))))
-