r3059: *** empty log message ***

diff --git a/NEWS b/NEWS
index c10949fee3630a6ce9a3f92dd33973e59a4a0c30..73147ac653281891384c1a1af3e3b56498ad45ca 100644 (file)
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,3 @@
-Now supports SBCL & OpenMCL.
+CLSQL now supports SBCL, OpenMCL, and SCL.
 
 

diff --git a/base/initialize.lisp b/base/initialize.lisp
index 7bb8d1bdff9cade2310ca82b3ea30d8f11e4c2f9..7adf1b5e7ddff8c75db1ef3d5442d5b67199fb4f 100644 (file)
--- a/base/initialize.lisp
+++ b/base/initialize.lisp
@@ -7,7 +7,7 @@
 ;;;; Programmers:   Kevin M. Rosenberg 
 ;;;; Date Started:  May 2002
 ;;;;
-;;;; $Id: initialize.lisp,v 1.1 2002/09/30 10:19:01 kevin Exp $
+;;;; $Id: initialize.lisp,v 1.2 2002/10/16 11:51:04 kevin Exp $
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;; and Copyright (c) 1999-2001 by Pierre R. Mai
@@ -23,6 +23,9 @@
 (defvar *loaded-database-types* nil
   "Contains a list of database types which have been defined/loaded.")
 
+(defmethod database-type-load-foreign (x)
+  (error "No generic function defined for database-type-load-foreign with parameters of %S" x))
+
 (defmethod database-type-load-foreign :after (database-type)
   (when (database-type-library-loaded database-type)
      (pushnew database-type *loaded-database-types*)))

diff --git a/clsql-base.asd b/clsql-base.asd
index 8d1bf0d5b802a4398347557b60cd94a0faaa8a04..5ca88a081ed5bfa1c5670197077f6bae4548a4d2 100644 (file)
--- a/clsql-base.asd
+++ b/clsql-base.asd
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Feb 2002
 ;;;;
-;;;; $Id: clsql-base.asd,v 1.16 2002/10/14 04:09:02 kevin Exp $
+;;;; $Id: clsql-base.asd,v 1.17 2002/10/16 11:51:04 kevin Exp $
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -18,7 +18,7 @@
 
 (in-package :asdf)
 
-#+(or allegro lispworks cmu sbcl openmcl mcl)
+#+(or allegro lispworks cmu sbcl openmcl mcl scl)
 (defsystem :clsql-base
   :name "cl-sql-base"
   :author "Kevin M. Rosenberg <kmr@debian.org>"
@@ -41,7 +41,7 @@
             (:file "db-interface" :depends-on ("conditions"))
             (:file "initialize" :depends-on ("db-interface"))))))
 
-#+(or allegro lispworks cmu sbcl openmcl mcl)
+#+(or allegro lispworks cmu sbcl openmcl mcl scl)
 (when (ignore-errors (find-class 'load-compiled-op))
   (defmethod perform :after ((op load-compiled-op) (c (eql (find-system :clsql-base))))
     (pushnew :clsql-base cl:*features*)))

diff --git a/clsql-mysql.asd b/clsql-mysql.asd
index f74d39cbac4cf1ccc8b8547c99152af1b213d7c1..0fa706ec256bfe824cf64cb690a0ac2ade2e0a24 100644 (file)
--- a/clsql-mysql.asd
+++ b/clsql-mysql.asd
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg\r
 ;;;; Date Started:  Aug 2002\r
 ;;;;\r
-;;;; $Id: clsql-mysql.asd,v 1.12 2002/10/14 04:09:02 kevin Exp $\r
+;;;; $Id: clsql-mysql.asd,v 1.13 2002/10/16 11:51:04 kevin Exp $\r
 ;;;;\r
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg\r
 ;;;;\r
@@ -20,7 +20,7 @@
 \r
 ;;; System definition\r
 \r
-#+(or allegro lispworks cmu sbcl openmcl mcl)\r
+#+(or allegro lispworks cmu sbcl openmcl mcl scl)\r
 (defsystem :clsql-mysql\r
   :name "cl-sql-mysql"\r
   :author "Kevin M. Rosenberg <kmr@debian.org>"\r

diff --git a/clsql-oracle.asd b/clsql-oracle.asd
index 8800008379d6964d1a9bf22dcfa35bb184b33646..d7834573d0bacffd2a74266d34697201377bd18b 100644 (file)
--- a/clsql-oracle.asd
+++ b/clsql-oracle.asd
@@ -1,13 +1,13 @@
 ;;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Base: 10 -*-
 ;;;; This is copyrighted software.  See interfaces/oracle/* files for terms.
 ;;;; 
-;;;; $Id: clsql-oracle.asd,v 1.11 2002/10/14 04:09:02 kevin Exp $
+;;;; $Id: clsql-oracle.asd,v 1.12 2002/10/16 11:51:04 kevin Exp $
 
 (in-package :asdf)
 
 ;;; System definition
 
-#+(or allegro lispworks cmu sbcl openmcl mcl)
+#+(or allegro lispworks cmu sbcl openmcl mcl scl)
 (defsystem :clsql-oracle
   :name "cl-sql-oracle"
   :author "Kevin M. Rosenberg <kmr@debian.org>"

diff --git a/clsql-postgresql-socket.asd b/clsql-postgresql-socket.asd
index 819d64d9c423675e587b7459da65c8757a24054d..466a4e4a50769817925f31b02e00763d11b92639 100644 (file)
--- a/clsql-postgresql-socket.asd
+++ b/clsql-postgresql-socket.asd
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg\r
 ;;;; Date Started:  Aug 2002\r
 ;;;;\r
-;;;; $Id: clsql-postgresql-socket.asd,v 1.12 2002/10/14 04:09:02 kevin Exp $\r
+;;;; $Id: clsql-postgresql-socket.asd,v 1.13 2002/10/16 11:51:04 kevin Exp $\r
 ;;;;\r
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg\r
 ;;;;\r
@@ -20,7 +20,7 @@
 \r
 ;;; System definition\r
 \r
-#+(or allegro lispworks cmu sbcl openmcl mcl)\r
+#+(or allegro lispworks cmu sbcl openmcl mcl scl)\r
 (defsystem :clsql-postgresql-socket\r
   :name "cl-sql-postgresql-socket"\r
   :author "Kevin M. Rosenberg <kmr@debian.org>"\r

diff --git a/clsql-postgresql.asd b/clsql-postgresql.asd
index b17607b8dcb433b28af4a71ef19534641fc4bf36..204a59c620d4be9f1e281a19011e0f71163f5e36 100644 (file)
--- a/clsql-postgresql.asd
+++ b/clsql-postgresql.asd
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg\r
 ;;;; Date Started:  Aug 2002\r
 ;;;;\r
-;;;; $Id: clsql-postgresql.asd,v 1.12 2002/10/14 04:09:02 kevin Exp $\r
+;;;; $Id: clsql-postgresql.asd,v 1.13 2002/10/16 11:51:04 kevin Exp $\r
 ;;;;\r
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg\r
 ;;;;\r
@@ -19,7 +19,7 @@
 (declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))\r
 (in-package :asdf)\r
 \r
-#+(or allegro lispworks cmu sbcl openmcl mcl)\r
+#+(or allegro lispworks cmu sbcl openmcl mcl scl)\r
 (defsystem :clsql-postgresql\r
   :name "cl-sql-postgresql"\r
   :author "Kevin M. Rosenberg <kmr@debian.org>"\r

diff --git a/clsql-uffi.asd b/clsql-uffi.asd
index 2d22cc2e3c15da05e46f4234a5597ea2deb8f77b..21ef79a4ac08ee3b220e5550cedafe4a680ae1da 100644 (file)
--- a/clsql-uffi.asd
+++ b/clsql-uffi.asd
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Aug 2002
 ;;;;
-;;;; $Id: clsql-uffi.asd,v 1.13 2002/10/14 04:09:02 kevin Exp $
+;;;; $Id: clsql-uffi.asd,v 1.14 2002/10/16 11:51:04 kevin Exp $
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -22,7 +22,7 @@
 
 ;;; System definition
 
-#+(or allegro lispworks cmu sbcl openmcl mcl)
+#+(or allegro lispworks cmu sbcl openmcl mcl scl)
 (defsystem :clsql-uffi
   :name "cl-sql-base"
   :author "Kevin M. Rosenberg <kmr@debian.org>"

diff --git a/clsql.asd b/clsql.asd
index 67e9b7f8dcd24a92ab43d9de18bfc08506f5f289..36c688cab3f037b22adfbffac8448760fe799d94 100644 (file)
--- a/clsql.asd
+++ b/clsql.asd
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Feb 2002
 ;;;;
-;;;; $Id: clsql.asd,v 1.14 2002/10/14 04:09:02 kevin Exp $
+;;;; $Id: clsql.asd,v 1.15 2002/10/16 11:51:04 kevin Exp $
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -18,7 +18,7 @@
 
 (in-package :asdf)
 
-#+(or allegro lispworks cmu sbcl openmcl mcl)
+#+(or allegro lispworks cmu sbcl openmcl mcl scl)
 (defsystem :clsql
   :name "cl-sql"
   :author "Kevin M. Rosenberg <kmr@debian.org>"
@@ -43,7 +43,7 @@
   :depends-on (:clsql-base)
   )
 
-#+(or allegro lispworks cmu sbcl openmcl mcl)
+#+(or allegro lispworks cmu sbcl openmcl mcl scl)
 (when (ignore-errors (find-class 'load-compiled-op))
   (defmethod perform :after ((op load-compiled-op) (c (eql (find-system :clsql))))
     (pushnew :clsql cl:*features*)))

diff --git a/debian/changelog b/debian/changelog
index 92f8b96a079d11b92a0d795f06d10cb14a6248ca..ee76d86c8277fcf4e6abd0a0265effa8b3e6a5ea 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,10 @@
+cl-sql (1.1.0-1) unstable; urgency=low
+
+  * Add SCL support.
+  * Fix file type in test-suite/tester-clsql.lisp
+
+ -- Kevin M. Rosenberg <kmr@debian.org>  Tue, 15 Oct 2002 13:34:41 -0600
+
 cl-sql (1.0.1-1) unstable; urgency=low
 
   * Add defgeneric for generic functions

diff --git a/doc/clsql.pdf b/doc/clsql.pdf
index ceff72a43bcc242195e0ae021dcd7441a4897844..d84df3a9241b866139deca0a8ed6beef6e9c574c 100644 (file)
Binary files a/doc/clsql.pdf and b/doc/clsql.pdf differ

diff --git a/test-suite/tester-clsql.lisp b/test-suite/tester-clsql.lisp
index 914c3f6246b1aa0a372811e74cf26cae469e4dcb..4959580c3a71ef9a0f01e3feb76db01c3c8e6501 100644 (file)
--- a/test-suite/tester-clsql.lisp
+++ b/test-suite/tester-clsql.lisp
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Mar 2002
 ;;;;
-;;;; $Id: tester-clsql.lisp,v 1.1 2002/09/30 10:19:23 kevin Exp $
+;;;; $Id: tester-clsql.lisp,v 1.2 2002/10/16 11:51:04 kevin Exp $
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -31,8 +31,7 @@
 (in-package :cl-user)
 
 (unless (find-package :util.test)
-  (load (make-pathname :name "acl-compat-tester" :type "cl"
-                      :defaults *load-truename*)))
+  (load (make-pathname :name "acl-compat-tester" :defaults *load-truename*)))
 
 (in-package :clsql-user)
 (use-package :util.test)