X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fpackage.lisp;h=76fbe5f81373dcaf6eeea0288b9a385b71b92371;hb=f2a0eb003af406415567c9f8545455ede786db87;hp=63847d33033eb5414acc3e07dc88aaa1654ba769;hpb=150e23be29d88d99e4114a8cff017b3cce005e10;p=clsql.git

diff --git a/sql/package.lisp b/sql/package.lisp
index 63847d3..76fbe5f 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
@@ -230,6 +231,16 @@
        #: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?
+       #:database-underlying-type
        ))
    (:export
     ;; "Private" exports for use by interface packages
@@ -253,12 +264,21 @@
     #: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?
+    #:database-underlying-type
    
    .
    ;; Shared exports for re-export by CLSQL. 
@@ -333,6 +353,7 @@
        #: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