paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 21:10:01 +02:00
Code Issues Packages Projects Releases Wiki Activity

* and one more fix to prevent endless loops

Browse Source 
git-svn-id: trunk@19196 -
This commit is contained in:
Jonas Maebe 2011-09-23 19:16:48 +00:00
parent 3469942f34
commit 258869c8f1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/unix/winiconv.inc
View File

@ -360,7 +360,7 @@
l:=low(win2iconv_arr); l:=low(win2iconv_arr);
h:=high(win2iconv_arr); h:=high(win2iconv_arr);
repeat repeat
i:=(l+h) shr 1; i:=(l+h+1) shr 1;
ccp:=win2iconv_arr[i].cp; ccp:=win2iconv_arr[i].cp;
if cp=ccp then if cp=ccp then
break; break;