summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authordgp@users.sourceforge.net <dgp>2013-09-13 14:09:09 (GMT)
committerdgp@users.sourceforge.net <dgp>2013-09-13 14:09:09 (GMT)
commit7755f8ae58a85bc8ca665839c7685ebfa779569c (patch)
treecc3b3fe93350cce310b13360ed32d036380bf33d /generic
parentf789e04792ee00a46602981f854b7bcd11fae50c (diff)
parent45db9bb87410e3afba86d6aa384e0399e41aad0a (diff)
downloadtcl-7755f8ae58a85bc8ca665839c7685ebfa779569c.zip
tcl-7755f8ae58a85bc8ca665839c7685ebfa779569c.tar.gz
tcl-7755f8ae58a85bc8ca665839c7685ebfa779569c.tar.bz2
[bdd91c7e43] Stop crash due to error in execution stack memory management.
Thanks to azazel for the fix.
Diffstat (limited to 'generic')
-rw-r--r--generic/tclExecute.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c
index 8fb8e63..e657828 100644
--- a/generic/tclExecute.c
+++ b/generic/tclExecute.c
@@ -2311,6 +2311,7 @@ TclExecuteByteCode(
initCatchTop += moved;
catchTop += moved;
+ bcFramePtr = (CmdFrame *) (initCatchTop + codePtr->maxExceptDepth + 1);
initTosPtr += moved;
tosPtr += moved;
esPtr = iPtr->execEnvPtr->execStackPtr;