X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fpackage.lisp;h=4ee3b1d86ea90ab058c55e0927f92deb1adfb826;hb=528064c179b6b74f0a9d6a43c42e71de3f0e9a3a;hp=7db94ddcdc9aeee047be2f6f1bb83cf3730139bb;hpb=dea46c447f6688f1519a6fbe7f5998d0eab7474c;p=clsql.git

diff --git a/sql/package.lisp b/sql/package.lisp
index 7db94dd..4ee3b1d 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*))
@@ -104,7 +104,6 @@
      #:check-connection-spec
      #:database-initialize-database-type
      #:database-type-load-foreign
-     #:database-name-from-spec
      #:database-connect
      #:database-disconnect
      #:database-query
@@ -181,7 +180,6 @@
      #:result-recording-stream
      #:record-caches
      #:view-classes
-     #:database-type
      #:database-state
      #:attribute-cache
      #:database-autocommit
@@ -204,7 +202,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 +256,8 @@
          #:find-database               
          #:status                      
          ;; CLSQL Extensions 
+         #:database-name-from-spec
+         #:database-type 
          #:with-database
          #:with-default-database
          #:disconnect-pooled
@@ -251,7 +265,6 @@
          #:create-database
          #:destroy-database
          #:probe-database
-         #:truncate-database
 
          ;; I/O Recording (recording.lisp) 
          #:add-sql-stream             
@@ -270,7 +283,6 @@
 	 #:list-attributes                
 	 #:attribute-type                 
 	 #:list-attribute-types		  
-	 #:*cache-table-queries-default*  
 	 #:create-view                    
 	 #:drop-view                      
 	 #:create-index                   
@@ -304,6 +316,7 @@
 	 #:map-query                    
 	 #:loop
          ;; CLSQL Extensions 
+         #:truncate-database
          #:for-each-row
 	 #:prepare-sql
 	 #:bind-parameter
@@ -332,6 +345,7 @@
 	 #:view-table        
 	 #:bigint
 	 #:varchar
+	 #:generalized-boolean
 	 #:*default-varchar-length*
 
 	 ;; OODML (oodml.lisp) 
@@ -346,7 +360,9 @@
 	 #:delete-instance-records          
 	 ;; CLSQL Extensions 
 	 #:*db-auto-sync*    
-
+	 #:write-instance-to-stream
+	 #:read-instance-from-stream
+	 
 	 ;; Symbolic SQL Syntax (syntax.lisp) 
 	 #:sql                              
 	 #:sql-expression