summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--changes2
-rw-r--r--generic/tclExecute.c1
2 files changed, 3 insertions, 0 deletions
diff --git a/changes b/changes
index 7376ba6..5d6ef97 100644
--- a/changes
+++ b/changes
@@ -7788,4 +7788,6 @@ Many revisions to better support a Cygwin environment (nijtmans)
2013-09-07 (bug fix)[86ceb4] have tm path favor first provider (neumann,porter)
+2013-09-13 (bug fix)[bdd91c] crash in exec stack mem management (azazel)
+
--- Released 8.5.15, September 16, 2013 --- http://core.tcl.tk/tcl/ for details
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;