X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fpackage.lisp;h=38fcaf7f28f4fca080791918169daefee4378810;hb=56258fd00b94162660969b6265a92f56d56cb84c;hp=5ebc7ff7274691651eaa2ecdf98570185299160f;hpb=cb683851a0af33e88b7c4995435dc0cf226f6cba;p=clsql.git

diff --git a/sql/package.lisp b/sql/package.lisp
index 5ebc7ff..38fcaf7 100644
--- a/sql/package.lisp
+++ b/sql/package.lisp
@@ -38,6 +38,7 @@
 	  #+clsql-sbcl-mop #:sb-mop
 	  #+clsql-cmucl-mop #:mop
 	  #+allegro #:mop
+	  #+clisp #:clos
 	  #+lispworks #:clos
 	  #+scl #:clos
 	  #+openmcl #:openmcl-mop)
@@ -45,6 +46,9 @@
     #+allegro
     (:shadowing-import-from 
      #:excl)
+    #+clisp
+    (:shadowing-import-from 
+     #:clos)
     #+lispworks
     (:shadowing-import-from 
      #:clos)
@@ -237,6 +241,12 @@
 	 #:sql-error
 	 #:sql-warning
 	 #:sql-database-warning
+         #:sql-error-database 
+         #:sql-error-database-type 
+         #:sql-error-connection-spec 
+         #:sql-error-expression 
+         #:sql-warning-database 
+         #:sql-user-error-message 
          #:*backend-warning-behavior*
 
          ;; Connection/initialisation (base-classes.lisp, database.lisp, 
@@ -314,7 +324,6 @@
 	 #:map-query                    
 	 #:loop
          ;; CLSQL Extensions 
-         #:for-each-row
 	 #:prepare-sql
 	 #:bind-parameter
 	 #:run-prepared-sql
@@ -343,7 +352,9 @@
 	 #:bigint
 	 #:varchar
 	 #:generalized-boolean
-	 #:*default-varchar-length*
+	 #:smallint
+	 #:tinyint
+	 #:*default-string-length*
 
 	 ;; OODML (oodml.lisp) 
 	 #:instance-refreshed