From 2b8e3fffb5153cb9fb7c567988338ad6cd163f72 Mon Sep 17 00:00:00 2001
From: dkf <donal.k.fellows@manchester.ac.uk>
Date: Tue, 27 Sep 2011 09:57:02 +0000
Subject: Release unused memory...

---
 generic/tclTest.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/generic/tclTest.c b/generic/tclTest.c
index 5b74663..30c95c8 100644
--- a/generic/tclTest.c
+++ b/generic/tclTest.c
@@ -7123,6 +7123,7 @@ TestparseargsCmd(
     result[1] = Tcl_NewIntObj(count);
     result[2] = Tcl_NewListObj(count, remObjv);
     Tcl_SetObjResult(interp, Tcl_NewListObj(3, result));
+    ckfree(remObjv);
     return TCL_OK;
 }
 
-- 
cgit v0.12