From 2699a0a2d5bd76e61781156524b741799aeeee3e Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Sun, 27 Mar 2016 06:41:30 +0200
Subject: [PATCH] fix stringrange static ctor from empty string

---
 src/ce_stringrange.pas | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/ce_stringrange.pas b/src/ce_stringrange.pas
index a8958baa..8f22413c 100644
--- a/src/ce_stringrange.pas
+++ b/src/ce_stringrange.pas
@@ -87,6 +87,11 @@ implementation
 
 class function TStringRange.create(const str: string): TStringRange;
 begin
+  result.ptr := nil;
+  result.pos := 0;
+  result.len := 0;
+  if str = '' then
+    exit;
   result.ptr := @str[1];
   result.pos := 0;
   result.len := length(str);