X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Fexpressions.lisp;h=766da12e6a3c9dba19b628aa608617d186c4da76;hp=e04180c615f662fe077bd9318acd61340b7bab0e;hb=e75e62c7127f074ef2b2add3d2850c42dfaf590e;hpb=832c19bb2ec9143062b34e43e8e4dcba65f4c83f

diff --git a/sql/expressions.lisp b/sql/expressions.lisp
index e04180c..766da12 100644
--- a/sql/expressions.lisp
+++ b/sql/expressions.lisp
@@ -902,7 +902,7 @@ uninclusive, and the args from that keyword to the end."
 
 (defmethod database-output-sql ((num number) database)
   (declare (ignore database))
-  (princ-to-string num))
+  (number-to-sql-string num))
 
 (defmethod database-output-sql ((arg list) database)
   (if (null arg)