forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix init of string range

This commit is contained in:
Basile Burg 2016-03-21 22:41:20 +01:00
parent 32655fd0d1
commit eeb9502757
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/ce_symstring.pas
View File

@ -245,7 +245,7 @@ end;
function TCESymbolExpander.expand(const value: string): string;
var
rng: TStringRange;
rng: TStringRange = (ptr:nil; pos:0; len: 0);
sym: string;
begin
Result := '';
@ -253,7 +253,7 @@ begin
exit;
//
updateSymbols;
rng := TStringRange.create(value);
rng.init(value);
while true do
begin
if rng.empty then