;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Feb 2002
;;;;
-;;;; $Id: clsql.system,v 1.13 2002/05/15 17:10:28 kevin Exp $
+;;;; $Id: clsql.system,v 1.19 2002/08/23 19:39:56 kevin Exp $
;;;;
;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
;;;; *************************************************************************
(declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
-(in-package :cl-user)
+(in-package :make)
-;; For use with non-Debian installations
-(let ((helper-pathname (make-pathname :name "set-cl-library" :type "cl"
+#-clsql-base
+(let ((path (make-pathname :name "clsql-base" :type "system"
:defaults *load-truename*)))
- (when (probe-file helper-pathname)
- (load helper-pathname)))
+ (when (probe-file path)
+ (load path)))
;;; System definitions
-(mk:defsystem :clsql
- :source-pathname "CL-LIBRARY:clsql;sql;"
- :source-extension "cl"
- :binary-pathname "CL-LIBRARY:clsql;sql;bin;"
- :components ((:file "pool")
- (:file "loop-extension")
- (:file "sql" :depends-on ("pool"))
- (:file "transactions" :depends-on ("sql"))
- (:file "utils")
- (:file "functional" :depends-on ("sql"))
- (:file "usql" :depends-on ("sql")))
- :depends-on (:clsql-base)
- :finally-do
- (pushnew :clsql cl:*features*)
- )
+(defsystem :clsql
+ :source-pathname #.(format nil "~A:clsql;" +clsql-logical-host+)
+ :source-extension "cl"
+ :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")))
+ :depends-on (:clsql-base)
+ :finally-do
+ (pushnew :clsql cl:*features*)
+ )