From: Russ Tyndall <russ@acceleration.net>
Date: Mon, 27 Jun 2011 18:15:01 +0000 (-0400)
Subject: fixed bad SQL_C_SBIGINT call that must have been a bad merge
X-Git-Tag: v5.4.0~1
X-Git-Url: http://git.kpe.io/?p=clsql.git;a=commitdiff_plain;h=18738a9744b8741091444d11fc317ecee6ff3b14

fixed bad SQL_C_SBIGINT call that must have been a bad merge
---

diff --git a/db-odbc/odbc-api.lisp b/db-odbc/odbc-api.lisp
index 5d2acf9..79b38f2 100644
--- a/db-odbc/odbc-api.lisp
+++ b/db-odbc/odbc-api.lisp
@@ -702,8 +702,7 @@ as possible second argument) to the desired representation of date/time/timestam
                        (get-cast-binary data-ptr out-len *binary-format*))
                       ((#.$SQL_C_SSHORT #.$SQL_C_STINYINT) ; LMH short ints
                        (get-cast-short data-ptr)) ; LMH
-                      (#.$SQL_C_SBIGINT (uffi:allocate-foreign-object #.$ODBC-BIG-TYPE)
-                       (get-cast-short data-ptr))
+                      (#.$SQL_C_SBIGINT (get-cast-big data-ptr))
                       #+ignore
                       (#.$SQL_C_CHAR
                        (code-char (get-cast-short data-ptr)))