X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=db-odbc%2Fodbc-api.lisp;h=92e7607c221d313fbd77986e7ba69c06ce5826be;hb=1a446890f95ab363af82529a133546d722ef21b1;hp=2f200ca7db40e4da0bc95be08d64a31cb22d3275;hpb=44452a3f9f128b5deb54b4dfe7249583eb4e090d;p=clsql.git diff --git a/db-odbc/odbc-api.lisp b/db-odbc/odbc-api.lisp index 2f200ca..92e7607 100644 --- a/db-odbc/odbc-api.lisp +++ b/db-odbc/odbc-api.lisp @@ -919,7 +919,7 @@ as possible second argument) to the desired representation of date/time/timestam do (setf res (%sql-get-data hstmt column-nr c-type data-ptr +max-precision+ out-len-ptr) out-len (deref-pointer out-len-ptr #.$ODBC-LONG-TYPE))) - (setf str (sb-ext:octets-to-string octets)) + (setf str (uffi:octets-to-string octets)) (if (= sql-type $SQL_DECIMAL) (let ((*read-base* 10)) (read-from-string str))