paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-20 19:29:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ Fixed typo, patch by Colin Western

Browse Source 
git-svn-id: trunk@507 -
This commit is contained in:
michael 2005-06-26 14:53:09 +00:00
parent a568981d7f
commit fee6627a8a
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
rtl/inc/wstrings.inc
View File

@ -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}