浏览代码

+ Fixed typo, patch by Colin Western

git-svn-id: trunk@507 -
michael 20 年之前
父节点
当前提交
fee6627a8a
共有 1 个文件被更改,包括 0 次插入1 次删除
  1. 0 1
      rtl/inc/wstrings.inc

+ 0 - 1
rtl/inc/wstrings.inc

@@ -633,7 +633,6 @@ begin
           Dec(Pointer(S),WideFirstOff);
           if L*sizeof(WideChar)+WideRecLen>MemSize(Pointer(S)) then
               reallocmem(pointer(S), L*sizeof(WideChar)+WideRecLen);
-          end;
           Inc(Pointer(S), WideFirstOff);
         end
 {$endif MSWINDOWS}