diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-27 09:53:04 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-27 09:53:04 (GMT) |
| commit | ffbe67c65253a900b98f481ed64d4928f470adb9 (patch) | |
| tree | cbefee17d73ae6aa5b48ee0bd65f8ed3162d8e46 /generic/tclExecute.c | |
| parent | d8238136ac782aaade9c86e8db5ce955a6f78937 (diff) | |
| parent | a57835e07ae4443feed31888c2fdb0e44b2748e0 (diff) | |
| download | tcl-ffbe67c65253a900b98f481ed64d4928f470adb9.zip tcl-ffbe67c65253a900b98f481ed64d4928f470adb9.tar.gz tcl-ffbe67c65253a900b98f481ed64d4928f470adb9.tar.bz2 | |
merge trunk.
Remove Tcl_SetPanicProc from stub table; it is meant to be called by embedders, before the stub table is even initialized.
Diffstat (limited to 'generic/tclExecute.c')
| -rw-r--r-- | generic/tclExecute.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index 08e0bab..2b0053a 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -2679,7 +2679,7 @@ TEBCresume( */ auxObjList->length += objc - 1; - if ((objc > 1) && (auxObjList-length > 0)) { + if ((objc > 1) && (auxObjList->length > 0)) { length = auxObjList->length /* Total expansion room we need */ + codePtr->maxStackDepth /* Beyond the original max */ - CURR_DEPTH; /* Relative to where we are */ |