From: Kevin M. Rosenberg Date: Mon, 19 Dec 2011 17:14:55 +0000 (-0700) Subject: Oracle foreign encoding fix X-Git-Tag: v6.1.0^0 X-Git-Url: http://git.kpe.io/?p=clsql.git;a=commitdiff_plain;h=c5ecb63ab302383d9a95043c0b3e35c1a1b8918e Oracle foreign encoding fix 2011-12-20 Kevin Rosenberg * db-oracle/oracle.lisp: Change length function to uffi:foreign-string-length to handle foreign encodings. --- diff --git a/ChangeLog b/ChangeLog index 02d93ca..0dde7a4 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2011-12-20 Kevin Rosenberg + * db-oracle/oracle.lisp: Change length function to + uffi:foreign-string-length to handle foreign encodings. + Thanks to Elias Martenson. + 2011-11-28 Russ Tyndall * db-odbc/odbc-api.lisp, tests/test-time.lisp diff --git a/db-oracle/oracle-sql.lisp b/db-oracle/oracle-sql.lisp index a58c843..7272b1c 100644 --- a/db-oracle/oracle-sql.lisp +++ b/db-oracle/oracle-sql.lisp @@ -514,7 +514,8 @@ the length of that format.") (oci-stmt-prepare (deref-vp stmthp) (deref-vp errhp) c-stmt-string - (length sql-stmt-string) + (uffi:foreign-string-length length + sql-stmt-string) +oci-ntv-syntax+ +oci-default+ :database db) (oci-attr-get (deref-vp stmthp) +oci-htype-stmt+ diff --git a/debian/changelog b/debian/changelog index be7a380..a77185b 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,9 @@ +cl-sql (6.1.0-1) unstable; urgency=low + + * New upstream + + -- Kevin M. Rosenberg Mon, 19 Dec 2011 10:13:58 -0700 + cl-sql (6.0.1-1) unstable; urgency=low * New upstream