X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Fpackage.lisp;h=0d6d375e1eaf28c2560bf6bb7f15029207b28360;hp=2a07e84490d45d129494c42d06e171a088619529;hb=a050eddab954ab3045d8427cf0c5563142266833;hpb=e622ee6f4bf2b9fe81af59d566e651c983a4833b

diff --git a/sql/package.lisp b/sql/package.lisp
index 2a07e84..0d6d375 100644
--- a/sql/package.lisp
+++ b/sql/package.lisp
@@ -5,6 +5,8 @@
 ;;;; Name:          package.lisp
 ;;;; Purpose:       Package definition for SQL interface
 ;;;;
+;;;; $Id$
+;;;; 
 ;;;; This file is part of CLSQL.
 ;;;;
 ;;;; CLSQL users are granted the rights to distribute and use this software
@@ -138,6 +140,7 @@
      #:db-type-has-views?
      #:db-type-has-bigint?
      #:db-type-has-union?
+     #:db-type-has-prepared-stmt?
      #:db-type-has-subqueries?
      #:db-type-has-boolean-where?
      #:db-type-transaction-capable?
@@ -162,6 +165,12 @@
      #:read-large-object
      #:delete-large-object
 
+     ;; Prepared statments
+     #:database-prepare
+     #:database-run-prepared
+     #:database-bind-parameter
+     #:database-free-prepared
+
      ;; accessors for database class
      #:name
      #:connection-spec
@@ -175,7 +184,8 @@
      #:database-type
      #:database-state
      #:attribute-cache
-   
+     #:database-autocommit
+
      ;; utils.lisp
      #:without-interrupts
      #:make-process-lock
@@ -188,6 +198,7 @@
      #:number-to-sql-string
      #:float-to-sql-string
      #:sql-escape-quotes
+     #:sql-escape 
      #:in
 
      ;; Generic backends
@@ -250,9 +261,6 @@
          #:sql-stream			
          #:start-sql-recording		
          #:stop-sql-recording		
-         ;; CLSQL Extensions 
-         #:record-sql-command
-         #:record-sql-result
 
 	 ;; FDDL (fddl.lisp) 
 	 #:create-table                   
@@ -262,7 +270,6 @@
 	 #:list-attributes                
 	 #:attribute-type                 
 	 #:list-attribute-types		  
-	 #:*cache-table-queries-default*  
 	 #:create-view                    
 	 #:drop-view                      
 	 #:create-index                   
@@ -297,25 +304,23 @@
 	 #:loop
          ;; CLSQL Extensions 
          #:for-each-row
+	 #:prepare-sql
+	 #:bind-parameter
+	 #:run-prepared-sql
+	 #:free-prepared-sql
 
          ;; Transaction handling (transaction.lisp) 
          #:with-transaction
          #:commit                        
          #:rollback			 
          ;; CLSQL Extensions 
-         #:commit-transaction
-         #:rollback-transaction
          #:add-transaction-commit-hook
          #:add-transaction-rollback-hook
          #:start-transaction             
          #:in-transaction-p              
-         #:database-start-transaction
-         #:database-abort-transaction
-         #:database-commit-transaction
-         #:transaction-level
-         #:transaction
+	 #:set-autocommit
 
-	 ;;  OODDL (ooddl.lisp) 
+	 ;; OODDL (ooddl.lisp) 
 	 #:standard-db-object               
 	 #:def-view-class                   
 	 #:create-view-from-class           
@@ -325,6 +330,9 @@
          ;; CLSQL Extensions 
 	 #:view-table        
 	 #:bigint
+	 #:varchar
+	 #:generalized-boolean
+	 #:*default-varchar-length*
 
 	 ;; OODML (oodml.lisp) 
 	 #:instance-refreshed               
@@ -371,8 +379,8 @@
 	 #:sql-and
 	 #:sql-or
 	 #:sql-in
-	 #:sql-concat
          #:sql-substr 
+         #:sql-concat-op 
 	 #:sql-=
 	 #:sql-<
          #:sql->
@@ -389,7 +397,10 @@
          #:sql-distinct 
          #:sql-nvl 
          #:sql-slot-value
+         #:sql-userenv 
          ;; CLSQL Extensions 
+	 #:sql-concat
+         #:sql-substring 
          #:sql-limit 
 	 #:sql-group-by
 	 #:sql-having