summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
832c19b)
* Version 3.4.1
* sql/expressions.lisp: Escape numbers to SQL strings
at expression level.
+12 Nov 2005 Kevin Rosenberg <kevin@rosenberg.net>
+ * Version 3.4.1
+ * sql/expressions.lisp: Escape numbers to SQL strings
+ at expression level.
+
11 Nov 2005 Kevin Rosenberg <kevin@rosenberg.net>
* Version 3.4: Add MySQL 5 support
* db-mysql/mysql-client-info.lisp: Recognize MySQL 5
11 Nov 2005 Kevin Rosenberg <kevin@rosenberg.net>
* Version 3.4: Add MySQL 5 support
* db-mysql/mysql-client-info.lisp: Recognize MySQL 5
+cl-sql (3.4.1-1) unstable; urgency=low
+
+ * New upstream
+
+ -- Kevin M. Rosenberg <kmr@debian.org> Fri, 11 Nov 2005 09:24:48 -0700
+
cl-sql (3.4.0-1) unstable; urgency=low
* New upstream
cl-sql (3.4.0-1) unstable; urgency=low
* New upstream
(defmethod database-output-sql ((num number) database)
(declare (ignore database))
(defmethod database-output-sql ((num number) database)
(declare (ignore database))
+ (number-to-sql-string num))
(defmethod database-output-sql ((arg list) database)
(if (null arg)
(defmethod database-output-sql ((arg list) database)
(if (null arg)
(defun number-to-sql-string (num)
(etypecase num
(integer
(defun number-to-sql-string (num)
(etypecase num
(integer
(rational
(float-to-sql-string (coerce num 'double-float)))
(number
(rational
(float-to-sql-string (coerce num 'double-float)))
(number