From 258869c8f1f344872bafdd45ea4c64f558f45aa9 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Fri, 23 Sep 2011 19:16:48 +0000
Subject: [PATCH]   * and one more fix to prevent endless loops

git-svn-id: trunk@19196 -
---
 rtl/unix/winiconv.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rtl/unix/winiconv.inc b/rtl/unix/winiconv.inc
index 6a9cab0d4b..2a052b1769 100644
--- a/rtl/unix/winiconv.inc
+++ b/rtl/unix/winiconv.inc
@@ -360,7 +360,7 @@
       l:=low(win2iconv_arr);
       h:=high(win2iconv_arr);
       repeat
-        i:=(l+h) shr 1;
+        i:=(l+h+1) shr 1;
         ccp:=win2iconv_arr[i].cp;
         if cp=ccp then
           break;