projects
/
clsql.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r9220: Added type specifier for universal-time.
[clsql.git]
/
sql
/
package.lisp
diff --git
a/sql/package.lisp
b/sql/package.lisp
index d38c55cd7a0341392bdbf9fad7e7da9ac16cceac..45b63033f2757b2f2ec739e78823f85ac1c22d8d 100644
(file)
--- a/
sql/package.lisp
+++ b/
sql/package.lisp
@@
-30,7
+30,7
@@
(eval-when (:compile-toplevel :load-toplevel :execute)
(defpackage #:clsql-sys
(eval-when (:compile-toplevel :load-toplevel :execute)
(defpackage #:clsql-sys
- (:use #:common-lisp #:clsql-base
-sys
+ (:use #:common-lisp #:clsql-base
#+clsql-sbcl-mop #:sb-mop
#+clsql-cmucl-mop #:mop
#+allegro #:mop
#+clsql-sbcl-mop #:sb-mop
#+clsql-cmucl-mop #:mop
#+allegro #:mop
@@
-96,7
+96,7
@@
)
(:import-from
)
(:import-from
- #:clsql-base
-sys
+ #:clsql-base
.
#1=(
;; conditions
.
#1=(
;; conditions
@@
-132,7
+132,8
@@
#:clsql-closed-error-database
#:clsql-type-error
#:clsql-sql-syntax-error
#:clsql-closed-error-database
#:clsql-type-error
#:clsql-sql-syntax-error
-
+ #:*backend-warning-behavior*
+
;; db-interface
#:check-connection-spec
#:database-initialize-database-type
;; db-interface
#:check-connection-spec
#:database-initialize-database-type
@@
-203,6
+204,10
@@
#:do-query
#:map-query
#:describe-table
#:do-query
#:map-query
#:describe-table
+ #:create-large-object
+ #:write-large-object
+ #:read-large-object
+ #:delete-large-object
;; recording.lisp -- SQL I/O Recording
;; recording.lisp -- SQL I/O Recording
@@
-368,6
+373,7
@@
#:set-sequence-position ; table xx
;;OODDL
#:view-table ; metaclass x
#:set-sequence-position ; table xx
;;OODDL
#:view-table ; metaclass x
+ #:universal-time ; objects xx
;;OODML
#:add-to-relation ; objects x
#:remove-from-relation ; objects x
;;OODML
#:add-to-relation ; objects x
#:remove-from-relation ; objects x