r9450: 22 May 2004 Kevin Rosenberg

[clsql.git] / sql / package.lisp

diff --git a/sql/package.lisp b/sql/package.lisp
index e9362c3783d8f77d9549355f0e2e0425ebcc1dc2..f196f5bd7ce46ec0d33683cffd834082ad033b22 100644 (file)
--- a/sql/package.lisp
+++ b/sql/package.lisp
@@ -114,8 +114,8 @@
      #:database-query-result-set
      #:database-dump-result-set
      #:database-store-next-row
-     #:database-get-type-specifier
      #:database-list-tables
+     #:database-list-tables-and-sequences
      #:database-table-exists-p
      #:database-list-views
      #:database-view-exists-p
@@ -145,6 +145,9 @@
      #:db-type-default-case
      #:db-type-use-column-on-drop-index? 
      #:database-underlying-type
+     #:database-get-type-specifier
+     #:read-sql-value
+     #:database-output-sql-as-type
 
      ;; Large objects 
      #:database-create-large-object
@@ -169,8 +172,7 @@
      #:database-type
      #:database-state
      #:attribute-cache
-     
-
+   
      ;; utils.lisp
      #:without-interrupts
      #:make-process-lock
@@ -179,7 +181,8 @@
      #:symbol-name-default-case
      #:convert-to-db-default-case
      #:ensure-keyword
-
+     #:getenv
+     
      #:*loaded-database-types*
      #:reload-database-types
      #:*connect-if-exists*
@@ -194,6 +197,10 @@
      #:float-to-sql-string
      #:sql-escape-quotes
      #:in
+
+     ;; Generic backends
+     #:generic-postgresql-database
+     #:generic-odbc-database
      
      .
      ;; Shared exports for re-export by CLSQL package. 
@@ -241,8 +248,8 @@
         #:table-exists-p                    ; table      xx 
         #:list-attributes                   ; table      xx
         #:attribute-type                    ; table      xx
-        #:list-attribute-types            ; table      xx
-        #:*cache-table-queries-default*
+        #:list-attribute-types              ; table      xx
+        #:*cache-table-queries-default*     ; table      xx 
         #:create-view                       ; table      xx
         #:drop-view                         ; table      xx
         #:create-index                      ; table      xx            
@@ -255,9 +262,9 @@
         #:drop-view-from-class              ; objects    xx
         ;;OODML
         #:instance-refreshed                ; objects    xx 
-        #:update-object-joins               ;
-        #:*default-update-objects-max-len*  ; 
-        #:update-slot-from-record         ; objects    xx
+        #:update-objects-joins              ; objects    xx
+        #:*default-update-objects-max-len*  ; objects    xx
+        #:update-slot-from-record           ; objects    xx
         #:update-instance-from-records      ; objects    xx
         #:update-records-from-instance      ; objects    xx
         #:update-record-from-slot           ; objects    xx
@@ -290,16 +297,10 @@
         #:set-sequence-position             ; table      xx
         ;;OODDL
         #:view-table                        ; metaclass  x
-        #:universal-time                  ; objects    xx 
+        #:universal-time                    ; objects    xx 
         #:bigint
         ;;OODML
         #:*db-auto-sync*                    ; objects    xx              
-        #:add-to-relation                   ; objects    x
-        #:remove-from-relation              ; objects    x
-        #:read-sql-value                    ; objects    x
-        #:database-output-sql-as-type       ; objects    x
-        #:database-get-type-specifier       ; objects    x
-        #:database-output-sql               ; sql/class  xx
         
         ;; conditions
         #:clsql-condition