X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;ds=sidebyside;f=base%2Fpackage.lisp;h=e403fb6b7daefc5b89ed9981560260eb75867bcb;hb=8a287a3182ffc4c245b43b6ca47f36ea640233f0;hp=9888ba1e3e70bb4a11e82b9a01df13740db6f0d9;hpb=e5744a78271044484b3399d4fc1d55b3e8808784;p=clsql.git

diff --git a/base/package.lisp b/base/package.lisp
index 9888ba1..e403fb6 100644
--- a/base/package.lisp
+++ b/base/package.lisp
@@ -34,6 +34,7 @@
      #:database-initialize-database-type
      #:database-connect
      #:database-disconnect
+     #:database-reconnect
      #:database-query
      #:database-execute-command
      #:database-query-result-set
@@ -42,7 +43,8 @@
      #:database-create
      #:database-destroy
      #:database-probe
-
+     #:database-describe-table
+     
      #:database-list-tables
      #:database-list-attributes
      #:database-attribute-type
@@ -57,8 +59,6 @@
      #:database-list-indexes
      #:database-list-views
      
-     ;; Support for pooled connections
-     #:database-type
      
      ;; Large objects (Marc B)
      #:database-create-large-object
@@ -67,6 +67,10 @@
      #:database-delete-large-object
 
      #:command-output
+     #:make-process-lock
+     #:with-process-lock
+     #:connection-spec
+     #:ensure-keyword
      
      ;; Shared exports for re-export by CLSQL-BASE
      .
@@ -113,9 +117,9 @@
 	 #:connected-databases
 	 #:database
 	 #:database-name
-	 #:closed-database
 	 #:find-database
 	 #:database-name-from-spec
+	 #:is-database-open
 
 	 ;; accessors for database class
 	 #:name
@@ -125,8 +129,11 @@
 	 #:conn-pool
 	 #:command-recording-stream
 	 #:result-recording-stream
+	 #:query-recording-stream
 	 #:view-classes
-	 
+	 #:database-type
+	 #:database-state
+
 	 ;; utils.lisp
 	 #:number-to-sql-string
 	 #:float-to-sql-string
@@ -207,8 +214,7 @@
 	 #:week-containing
 
 	 ;; recording.lisp -- SQL I/O Recording 
-	 #:record-sql-comand
-	 #:record-sql-result
+	 #:record-sql-action
 	 #:add-sql-stream                 ; recording  xx
 	 #:delete-sql-stream	          ; recording  xx
 	 #:list-sql-streams	          ; recording  xx
@@ -244,6 +250,7 @@
 	 #:delete-large-object
 	 #:do-query
 	 #:map-query
+	 #:describe-table
 
 	 ;; Transactions
 	 #:with-transaction