paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-02 20:21:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

LCL: formatting

Browse Source 
git-svn-id: trunk@41961 -
This commit is contained in:
juha 2013-07-01 23:33:45 +00:00
parent c1af98e79a
commit 86818186ba
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lcl/lresources.pp
View File

@ -2642,8 +2642,7 @@ begin
end; end;
end; end;
procedure LRSObjectTextToBinary(Input, Output: TStream; procedure LRSObjectTextToBinary(Input, Output: TStream; Links: TLRPositionLinks);
Links: TLRPositionLinks);
var var
parser: {$IFDEF DisableWindowsUnicodeSupport}TParser{$ELSE}TUTF8Parser{$ENDIF}; parser: {$IFDEF DisableWindowsUnicodeSupport}TParser{$ELSE}TUTF8Parser{$ENDIF};
OldDecimalSeparator: Char; OldDecimalSeparator: Char;