summaryrefslogtreecommitdiffstats
path: root/generic/tclExecute.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclExecute.c')
-rw-r--r--generic/tclExecute.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c
index dd436f9..96d2d62 100644
--- a/generic/tclExecute.c
+++ b/generic/tclExecute.c
@@ -892,7 +892,8 @@ TclCreateExecEnv(
/* Initialize the NRE stack */
- eePtr->callbackPtr = TclGetCallback(interp);
+ ((Interp *) interp)->execEnvPtr = eePtr;
+ eePtr->callbackPtr = TclNewCallback(interp);
eePtr->callbackPtr--;
return eePtr;
}