From cd88ed198e39cc969fedca8da56eff60fd6c2e0a Mon Sep 17 00:00:00 2001
From: Omar Rizwan <omar@omar.website>
Date: Thu, 29 Jun 2023 17:08:39 -0400
Subject: Fix minor(?) memory leak

---
 lib/evaluator.tcl | 1 +
 1 file changed, 1 insertion(+)

(limited to 'lib')

diff --git a/lib/evaluator.tcl b/lib/evaluator.tcl
index f890238b..6d462d09 100644
--- a/lib/evaluator.tcl
+++ b/lib/evaluator.tcl
@@ -1024,6 +1024,7 @@ namespace eval Evaluator {
             for (int j = 0; j < results[i]->matchedStatementIdsCount; j++) {
                 parents[parentsCount++] = results[i]->matchedStatementIds[j];
             }
+            ckfree((char *)results[i]);
         }
 
         // Create a new match for the new collection.
-- 
cgit v1.2.3