X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fpackage.lisp;h=52a203854bd16809231fe00d9c6cdcb6dc492a7a;hb=57620e961987757747e59eb7024b22c6d87b9c97;hp=a6058c9a26a7fbbf7b755dbc2a12d1a710c9a429;hpb=a59cf18342a0fce5f6f857957cb14f8fe1acbef8;p=clsql.git

diff --git a/sql/package.lisp b/sql/package.lisp
index a6058c9..52a2038 100644
--- a/sql/package.lisp
+++ b/sql/package.lisp
@@ -149,6 +149,7 @@
        #:database-list-tables
        #:database-list-views
        #:database-list-indexes
+       #:database-list-table-indexes
        #:database-list-sequences
        #:database-list-attributes
        #:database-attribute-type
@@ -167,7 +168,6 @@
        #:command-recording-stream
        #:result-recording-stream
        #:database-view-classes
-       #:database-schema
        #:conn-pool
        #:print-object 
        ;; utils
@@ -231,6 +231,18 @@
        #:database-commit-transaction
        #:transaction-level
        #:transaction
+       
+       ;; Database capabilities
+       #:db-type-use-column-on-drop-index?
+       #:db-backend-has-create/destroy-db?
+       #:db-type-has-views?
+       #:db-type-has-subqueries?
+       #:db-type-has-boolean-where?
+       #:db-type-transaction-capable?
+       #:db-type-has-fancy-math?
+       #:db-type-default-case
+       #:convert-to-db-default-case
+       #:database-underlying-type
        ))
    (:export
     ;; "Private" exports for use by interface packages
@@ -254,12 +266,22 @@
     #:database-list-views
     #:database-view-exists-p
     #:database-list-indexes
+    #:database-list-table-indexes
     #:database-index-exists-p
     #:database-list-sequences
     #:database-sequence-exists-p
     #:database-list-attributes
     #:database-attribute-type
     #:database-describe-table
+
+    #:db-backend-has-create/destroy-db?
+    #:db-type-has-views?
+    #:db-type-has-subqueries?
+    #:db-type-has-boolean-where?
+    #:db-type-transaction-capable?
+    #:db-type-has-fancy-math?
+    #:db-type-default-case
+    #:database-underlying-type
    
    .
    ;; Shared exports for re-export by CLSQL. 
@@ -330,11 +352,11 @@
        #:reload-database-types             ; clsql-base xx
        #:database-type                     ; database   x
        #:is-database-open
-       #:in-schema                         ; classes    x
        ;;FDDL 
        #:list-views                        ; table      xx
        #:view-exists-p                     ; table      xx
        #:list-indexes                      ; table      xx
+       #:list-table-indexes                ; table      xx
        #:index-exists-p                    ; table      xx
        #:create-sequence                   ; table      xx
        #:drop-sequence                     ; table      xx