X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Fgeneric-postgresql.lisp;h=6716d14eabac8673c7dabebbc0135d81c03eac6d;hp=af0ef61fabb0ff15a91f65792d33313771af8677;hb=e622ee6f4bf2b9fe81af59d566e651c983a4833b;hpb=7308bdf188da6424e615ca14096ef53cfb845a90

diff --git a/sql/generic-postgresql.lisp b/sql/generic-postgresql.lisp
index af0ef61..6716d14 100644
--- a/sql/generic-postgresql.lisp
+++ b/sql/generic-postgresql.lisp
@@ -227,3 +227,12 @@
            (sql-escape (string-downcase table)))
    database :auto nil))
 
+
+;; Capabilities
+
+(defmethod db-type-has-fancy-math? ((db-type (eql :postgresql)))
+  t)
+
+(defmethod db-type-default-case ((db-type (eql :postgresql)))
+  :lower)
+