From 557786360893e144c08ad7342f414ff0720164bf Mon Sep 17 00:00:00 2001
From: dgp <dgp@users.sourceforge.net>
Date: Wed, 28 Oct 2009 21:10:57 +0000
Subject:        * generic/tclLiteral.c: Backport fix for [Bug 2888044].

---
 ChangeLog            | 4 ++++
 generic/tclLiteral.c | 3 ++-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 033471d..5f72dcb 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2009-10-28  Don Porter  <dgp@users.sourceforge.net>
+
+	* generic/tclLiteral.c:	Backport fix for [Bug 2888044].
+
 2009-10-28  Kevin B. Kenny  <kennykb@acm.org>
 
 	* tests/fileName.test (fileName-20.[78]): Corrected poor test
diff --git a/generic/tclLiteral.c b/generic/tclLiteral.c
index 0a45f4d..a3c50c3 100644
--- a/generic/tclLiteral.c
+++ b/generic/tclLiteral.c
@@ -13,7 +13,7 @@
  * See the file "license.terms" for information on usage and redistribution of
  * this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclLiteral.c,v 1.33 2007/12/13 15:23:19 dgp Exp $
+ * RCS: @(#) $Id: tclLiteral.c,v 1.33.2.1 2009/10/28 21:10:57 dgp Exp $
  */
 
 #include "tclInt.h"
@@ -136,6 +136,7 @@ TclCleanupLiteralTable(
 		    objPtr->typePtr = NULL;
 		    typePtr->freeIntRepProc(objPtr);
 		    didOne = 1;
+		    break;
 		} else {
 		    entryPtr = nextPtr;
 		}
-- 
cgit v0.12