X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fpackage.lisp;h=011353b5b3227b2513c31b7747586e7bce76af2e;hb=d0b5c8c2a14929792d2d5818b57db27cae4484b2;hp=4ee3b1d86ea90ab058c55e0927f92deb1adfb826;hpb=528064c179b6b74f0a9d6a43c42e71de3f0e9a3a;p=clsql.git

diff --git a/sql/package.lisp b/sql/package.lisp
index 4ee3b1d..011353b 100644
--- a/sql/package.lisp
+++ b/sql/package.lisp
@@ -128,7 +128,6 @@
      #:database-sequence-exists-p
      #:database-list-attributes
      #:database-attribute-type
-     #:database-describe-table
      #:database-type-library-loaded
      #:database-create
      #:database-destroy
@@ -238,6 +237,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, 
@@ -288,11 +293,10 @@
 	 #:create-index                   
 	 #:drop-index                     
          ;; CLSQL Extensions 
-         #:describe-table
+         #:truncate-database
 	 #:list-views                  
 	 #:view-exists-p               
 	 #:list-indexes                
-	 #:list-table-indexes          
 	 #:index-exists-p              
 	 #:create-sequence             
 	 #:drop-sequence               
@@ -316,8 +320,6 @@
 	 #:map-query                    
 	 #:loop
          ;; CLSQL Extensions 
-         #:truncate-database
-         #:for-each-row
 	 #:prepare-sql
 	 #:bind-parameter
 	 #:run-prepared-sql
@@ -346,7 +348,7 @@
 	 #:bigint
 	 #:varchar
 	 #:generalized-boolean
-	 #:*default-varchar-length*
+	 #:*default-string-length*
 
 	 ;; OODML (oodml.lisp) 
 	 #:instance-refreshed