From 42cc1228e98bd1333c0f67c944f3aa0e07ba248f Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Fri, 23 Apr 2004 03:47:37 +0000 Subject: [PATCH] r9136: fix tinyint allocation --- db-odbc/odbc-api.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/db-odbc/odbc-api.lisp b/db-odbc/odbc-api.lisp index 166285d..e34706c 100644 --- a/db-odbc/odbc-api.lisp +++ b/db-odbc/odbc-api.lisp @@ -691,7 +691,7 @@ as possible second argument) to the desired representation of date/time/timestam (#.$SQL_C_FLOAT (uffi:allocate-foreign-object :float)) (#.$SQL_C_DOUBLE (uffi:allocate-foreign-object :double)) (#.$SQL_C_BIT (uffi:allocate-foreign-object :byte)) - (#.$SQL_C_STINYINT (uffi:allocate-foreign-object :short)) + (#.$SQL_C_STINYINT (uffi:allocate-foreign-object :byte)) (#.$SQL_C_SSHORT (uffi:allocate-foreign-object :short)) (#.$SQL_C_CHAR (uffi:allocate-foreign-string (1+ size))) (#.$SQL_C_BINARY (uffi:allocate-foreign-string (1+ (* 2 size)))) -- 2.34.1