X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=clsql.asd;h=cef8387f6fa0d35be9c1b29807e51be3be7e43db;hp=2890db90e0f67c83b3d0196f440408fca124d1d9;hb=ce0e343835a040406678dff74a62d1b0cb56f317;hpb=2434b58ef00a7f6c5915c86b25a891c4adda79e4 diff --git a/clsql.asd b/clsql.asd index 2890db9..cef8387 100644 --- a/clsql.asd +++ b/clsql.asd @@ -2,12 +2,12 @@ ;;;; ************************************************************************* ;;;; FILE IDENTIFICATION ;;;; -;;;; Name: clsql.system -;;;; Purpose: Defsystem-3/4 for CLSQL +;;;; Name: clsql.asd +;;;; Purpose: System definition for CLSQL ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; $Id: clsql.asd,v 1.8 2002/09/18 07:50:01 kevin Exp $ +;;;; $Id$ ;;;; ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -16,24 +16,31 @@ ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL. ;;;; ************************************************************************* -(in-package :asdf) +(defpackage #:clsql-system (:use #:asdf #:cl)) +(in-package #:clsql-system) +#+(or allegro lispworks cmu sbcl openmcl mcl scl) (defsystem clsql - :perform (load-op :after (op clsql) - (pushnew :clsql cl:*features*)) + :name "clsql" + :author "Kevin Rosenberg " + :maintainer "Kevin M. Rosenberg " + :version "1.5.x" + :licence "Lessor Lisp General Public License" + :description "Common Lisp SQL Interface Library" + :long-description "cl-sql package provides the high-level interface for the CLSQL system." + :components ((:module :sql :components ((:file "package") - (:file "pool" :depends-on ("package")) - (:file "loop-extension") - (:file "sql" :depends-on ("pool")) - (:file "transactions" :depends-on ("sql")) + (:file "sql" :depends-on ("package")) (:file "functional" :depends-on ("sql")) - (:file "usql" :depends-on ("sql"))))) + (:file "usql" :depends-on ("sql")) + ))) :depends-on (:clsql-base) ) -(defmethod source-file-type ((c cl-source-file) -e (s (eql (find-system :clsql)))) - "cl") +#+(or allegro lispworks cmu sbcl openmcl mcl scl) +(defmethod perform ((o test-op) (c (eql (find-system :clsql)))) + (oos 'load-op 'clsql-tests) + (oos 'test-op 'clsql-tests))