From eeb95027571617890794bbf21b1be4d2647e7ab2 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Mon, 21 Mar 2016 22:41:20 +0100
Subject: [PATCH] fix init of string range

---
 src/ce_symstring.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/ce_symstring.pas b/src/ce_symstring.pas
index d54b682d..5770da44 100644
--- a/src/ce_symstring.pas
+++ b/src/ce_symstring.pas
@@ -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