From c10ff3fab6298db65bcb47ba2c69539a1a3108a7 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Mon, 23 Jul 2007 20:48:10 +0000
Subject: [PATCH] Try to nuke some memory leaks.

---
 source/helpers.pas | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/source/helpers.pas b/source/helpers.pas
index 19e76d4e..3a49275f 100644
--- a/source/helpers.pas
+++ b/source/helpers.pas
@@ -332,6 +332,8 @@ begin
   s := trim(s);
   if length(s) > 0 then
     list.Add(s);
+  // Avoid memory leak
+  s := '';
 end;
 
 
@@ -464,6 +466,9 @@ begin
 
   if start < i then
     addResult(result, copy(sql, start, i-start+1));
+
+  // Avoid memory leak
+  sql := '';
 end;