diff options
| author | dgp <dgp@users.sourceforge.net> | 2013-05-30 20:03:03 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2013-05-30 20:03:03 (GMT) |
| commit | a71d301ffff0f52816c262ba09045a31c2e8fe03 (patch) | |
| tree | 680275afe79693a2dcc0e13255253885213b3c86 | |
| parent | 3ffeb15b9839253c8e97d15d3dc2678726ba1651 (diff) | |
| download | tcl-a71d301ffff0f52816c262ba09045a31c2e8fe03.zip tcl-a71d301ffff0f52816c262ba09045a31c2e8fe03.tar.gz tcl-a71d301ffff0f52816c262ba09045a31c2e8fe03.tar.bz2 | |
Back on track.
| -rw-r--r-- | generic/tclExecute.c | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index fd5991a..0af5be2 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -2748,10 +2748,6 @@ TEBCresume( */ auxObjList->length += objc; - -/* - length = objc + (codePtr->maxStackDepth - TclGetInt4AtPtr(pc+1)); -*/ length = auxObjList->length /* Total expansion room we need */ + codePtr->maxStackDepth /* Beyond the original max */ - CURR_DEPTH; /* Relative to where we are */ |