summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordavygrvy <davygrvy@pobox.com>2004-05-06 01:04:53 (GMT)
committerdavygrvy <davygrvy@pobox.com>2004-05-06 01:04:53 (GMT)
commit7396c2e38ab6095aa40c23412309ecb4387f55b4 (patch)
treef20ec211be9e4f025e94db5f2306870ad7792a07
parent2cdf4d07e53202f69d06d9c388f89198b0f16f5f (diff)
downloadtcl-7396c2e38ab6095aa40c23412309ecb4387f55b4.zip
tcl-7396c2e38ab6095aa40c23412309ecb4387f55b4.tar.gz
tcl-7396c2e38ab6095aa40c23412309ecb4387f55b4.tar.bz2
* generic/tclEncoding.c: Added FreeEncoding(systemEncoding) in
TclFinalizeEncodingSubsystem because its ref count was incremented in TclInitEncodingSubsystem.
-rw-r--r--generic/tclEncoding.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c
index 870d587..c596911 100644
--- a/generic/tclEncoding.c
+++ b/generic/tclEncoding.c
@@ -8,7 +8,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclEncoding.c,v 1.16.2.3 2004/03/29 18:49:35 hobbs Exp $
+ * RCS: @(#) $Id: tclEncoding.c,v 1.16.2.4 2004/05/06 01:04:53 davygrvy Exp $
*/
#include "tclInt.h"
@@ -314,6 +314,7 @@ TclFinalizeEncodingSubsystem()
Tcl_MutexLock(&encodingMutex);
encodingsInitialized = 0;
+ FreeEncoding(systemEncoding);
hPtr = Tcl_FirstHashEntry(&encodingTable, &search);
while (hPtr != NULL) {
/*