X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fdb-interface.lisp;h=64841728855094f6461f77a9c03a4d4ab4f5b805;hb=5be31565b7d87b90f0e79a9e61af84ad05e12920;hp=62436309b25e550bf877a09f493c4e65d74bafdc;hpb=5398a720dd42b3c2787ff67414e6ce424bc34e1b;p=clsql.git

diff --git a/sql/db-interface.lisp b/sql/db-interface.lisp
index 6243630..6484172 100644
--- 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))