r9388: * db-oracle/oracle-api: Add OCIServerVersion

[clsql.git] / sql / db-interface.lisp

diff --git a/sql/db-interface.lisp b/sql/db-interface.lisp
index 84702b9c940e7170c69beb23ae01d57c8e284f5e..64841728855094f6461f77a9c03a4d4ab4f5b805 100644 (file)
--- a/sql/db-interface.lisp
+++ b/sql/db-interface.lisp
@@ -218,6 +218,13 @@ of TYPE_NAME (keyword) PRECISION SCALE NULLABLE."))
           t)
   (:documentation "T [default] if database-type supports views."))
 
+(defgeneric db-type-has-bigint? (db-type)
+  (:method (db-type)
+          (declare (ignore db-type))
+          ;; SQL92 has bigint
+          t)
+  (:documentation "T [default] if database-type supports bigint."))
+
 (defgeneric db-type-default-case (db-type)
   (:method (db-type)
           (declare (ignore db-type))
@@ -244,6 +251,12 @@ of TYPE_NAME (keyword) PRECISION SCALE NULLABLE."))
           t)
   (:documentation "T [default] if database-type supports boolean WHERE clause, such as 'WHERE MARRIED'."))
 
+(defgeneric db-type-has-union? (db-type)
+  (:method (db-type)
+          (declare (ignore db-type))
+          t)
+  (:documentation "T [default] if database-type supports boolean UNION."))
+
 (defgeneric db-backend-has-create/destroy-db? (db-type)
   (:method (db-type)
           (declare (ignore db-type))