X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Fpackage.lisp;h=32365c0a9313d949b9a30be44d4adfd513f6a7ef;hp=0d6d375e1eaf28c2560bf6bb7f15029207b28360;hb=aee3ea30595ebee301ccb1532062053c3c580e19;hpb=bb5ae29c168859601734780a1cc923d96a90cd29 diff --git a/sql/package.lisp b/sql/package.lisp index 0d6d375..32365c0 100644 --- a/sql/package.lisp +++ b/sql/package.lisp @@ -20,7 +20,7 @@ ;;;; core packages. (eval-when (:compile-toplevel :load-toplevel :execute) - #+sbcl + #+sbcl (if (find-package 'sb-mop) (pushnew :clsql-sbcl-mop cl:*features*) (pushnew :clsql-sbcl-pcl cl:*features*)) @@ -181,7 +181,6 @@ #:result-recording-stream #:record-caches #:view-classes - #:database-type #:database-state #:attribute-cache #:database-autocommit @@ -204,7 +203,21 @@ ;; Generic backends #:generic-postgresql-database #:generic-odbc-database - + + ;; Subclasses of sql-expresssion (expressions.lisp) + #:sql-function-exp + #:sql-value-exp + #:sql-set-exp + #:sql-query-modifier-exp + #:sql-relational-exp + #:sql-upcase-like + #:sql-assignment-exp + #:sql-typecast-exp + #:sql-between-exp + #:sql-ident + #:sql-ident-attribute + #:sql-ident-table + . ;; Shared exports for re-export by CLSQL package. @@ -244,6 +257,7 @@ #:find-database #:status ;; CLSQL Extensions + #:database-type #:with-database #:with-default-database #:disconnect-pooled