소스 검색

Merged revisions 8078 via svnmerge from
svn+ssh://[email protected]/FPC/svn/fpc/trunk

........
r8078 | Almindor | 2007-07-16 20:24:32 +0200 (Mon, 16 Jul 2007) | 2 lines

* fix UnicodeToUtf8 if Dest is nil, patch by Sergei Gorelkin

........

git-svn-id: branches/fixes_2_2@8099 -

joost 18 년 전
부모
커밋
d7e4349f30
1개의 변경된 파일1개의 추가작업 그리고 0개의 파일을 삭제
  1. 1 0
      rtl/inc/wstrings.inc

+ 1 - 0
rtl/inc/wstrings.inc

@@ -1515,6 +1515,7 @@ function UnicodeToUtf8(Dest: PChar; MaxDestBytes: SizeUInt; Source: PWideChar; S
               else
                 inc(j,3);
             end;
+            inc(i);
           end;
       end;
     result:=j+1;