From ec7fc12be004c1f6ed38271169fb6be0c17d4974 Mon Sep 17 00:00:00 2001
From: Nathan Bird <nathan@acceleration.net>
Date: Wed, 29 Jun 2011 14:56:57 -0400
Subject: [PATCH] BUGFIX: when read-data-in-chunks had an off-by-1 error when
 dealing with strings of length (1+ +max-precision+).

---
 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 a65f6a0..1e26c45 100644
--- a/db-odbc/odbc-api.lisp
+++ b/db-odbc/odbc-api.lisp
@@ -926,7 +926,7 @@ as possible second argument) to the desired representation of date/time/timestam
                                    (error 'clsql:sql-database-error :message "wrong type. preliminary."))
                             while
                             (and (= res $SQL_SUCCESS_WITH_INFO)
-                                 (> out-len +max-precision+))
+                                 (>= out-len +max-precision+))
                             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)))
-- 
2.34.1