projects
/
clsql.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r9123: test & capability updates
[clsql.git]
/
base
/
db-interface.lisp
diff --git
a/base/db-interface.lisp
b/base/db-interface.lisp
index 9591c9c488495970b06952b87767c692a74e830d..9a91a6902c2ebebe3357d9a102fa5ac7d551d637 100644
(file)
--- a/
base/db-interface.lisp
+++ b/
base/db-interface.lisp
@@
-224,6
+224,12
@@
the given lisp type and parameters."))
t)
(:documentation "T [default] if database-type supports views."))
t)
(:documentation "T [default] if database-type supports views."))
+(defgeneric db-type-has-fancy-math? (db-type)
+ (:method (db-type)
+ (declare (ignore db-type))
+ nil)
+ (:documentation "NIL [default] if database-type does not have fancy math."))
+
(defgeneric db-type-has-subqueries? (db-type)
(:method (db-type)
(declare (ignore db-type))
(defgeneric db-type-has-subqueries? (db-type)
(:method (db-type)
(declare (ignore db-type))
@@
-233,7
+239,7
@@
the given lisp type and parameters."))
(defgeneric db-type-has-boolean-where? (db-type)
(:method (db-type)
(declare (ignore db-type))
(defgeneric db-type-has-boolean-where? (db-type)
(:method (db-type)
(declare (ignore db-type))
- ;; SQL9
2
has boolean where
+ ;; SQL9
9
has boolean where
t)
(:documentation "T [default] if database-type supports boolean WHERE clause, such as 'WHERE MARRIED'."))
t)
(:documentation "T [default] if database-type supports boolean WHERE clause, such as 'WHERE MARRIED'."))