X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=clsql.asd;h=324ff5def309f888629e7635cea9757650e9d688;hb=0196e0db0edccccab4cd8a0d6309e768a98667fd;hp=d588c91469fb1037f5eb8aba35cbd43fc49411ca;hpb=9f51f67ab4f038fef0cc9f84bb9db2f4072d8a9e;p=clsql.git diff --git a/clsql.asd b/clsql.asd index d588c91..324ff5d 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.6 2002/09/06 11:08:19 kevin Exp $ +;;;; $Id$ ;;;; ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -16,36 +16,31 @@ ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL. ;;;; ************************************************************************* -(declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0))) - -(in-package :asdf) - -#-clsql-base -(let ((path (make-pathname :name "clsql-base" :type "system" - :defaults *load-truename*))) - (when (probe-file path) - (load path))) - -;;; System definitions - +(defpackage #:clsql-system (:use #:asdf #:cl)) +(in-package #:clsql-system) +#+(or allegro lispworks cmu sbcl openmcl mcl scl) (defsystem clsql - :pathname #.(format nil "~A:clsql;" - #+common-lisp-controller "cl-library" - #-common-lisp-controller "clsql") - :perform (load-op :after (op clsql) - (pushnew :clsql cl:*features*)) - :components ((:file "package") - (:file "pool" :depends-on ("package")) - (:file "loop-extension") - (:file "sql" :depends-on ("pool")) - (:file "transactions" :depends-on ("sql")) - (:file "functional" :depends-on ("sql")) - (:file "usql" :depends-on ("sql"))) + :name "clsql" + :author "Kevin Rosenberg " + :maintainer "Kevin M. Rosenberg " + :version "2.1.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 "sql" :depends-on ("package")) + (:file "functional" :depends-on ("sql")) + (:file "usql" :depends-on ("sql")) + ))) :depends-on (:clsql-base) ) -(defmethod source-file-type ((c cl-source-file) - (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))