From 14b51b9da52e85337007dfc59d89c8318c61ae16 Mon Sep 17 00:00:00 2001
From: escoffon <escoffon>
Date: Wed, 1 Jul 1998 17:57:42 +0000
Subject: - modified to use the AuxDataType setup.

---
 generic/tclExecute.c | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/generic/tclExecute.c b/generic/tclExecute.c
index 3a75d88..6749be8 100644
--- a/generic/tclExecute.c
+++ b/generic/tclExecute.c
@@ -9,7 +9,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * SCCS: @(#) tclExecute.c 1.102 97/11/06 11:36:35
+ * SCCS: %Z% $Id: tclExecute.c,v 1.3 1998/07/01 17:57:42 escoffon Exp $ 
  */
 
 #include "tclInt.h"
@@ -449,8 +449,9 @@ TclCreateExecEnv(interp)
     eePtr->stackEnd = (TCL_STACK_INITIAL_SIZE - 1);
 
     if (!execInitialized) {
-	InitByteCodeExecution(interp);
-	execInitialized = 1;
+        TclInitAuxDataTypeTable();
+        InitByteCodeExecution(interp);
+        execInitialized = 1;
     }
 
     return eePtr;
@@ -504,6 +505,7 @@ void
 TclFinalizeExecEnv()
 {
     execInitialized = 0;
+    TclFinalizeAuxDataTypeTable();
 }
 
 /*
-- 
cgit v0.12