diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-10 15:02:24 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-10 15:02:24 (GMT) |
commit | 0b39585b19e94e663d35f0618c748abfb37de5cd (patch) | |
tree | a80c320541298c393521f3f88ba7605a004ac050 /generic/tclBasic.c | |
parent | 643fbd40d93f1432a5465323319edaa756f309f8 (diff) | |
download | tcl-0b39585b19e94e663d35f0618c748abfb37de5cd.zip tcl-0b39585b19e94e663d35f0618c748abfb37de5cd.tar.gz tcl-0b39585b19e94e663d35f0618c748abfb37de5cd.tar.bz2 |
Enhance internal "struct Interp" such that it can handle more than 2^31 levels
Diffstat (limited to 'generic/tclBasic.c')
-rw-r--r-- | generic/tclBasic.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c index dbb20a5..b7b58a7 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -3930,7 +3930,7 @@ TclInterpReady( * probably because of an infinite loop somewhere. */ - if (((iPtr->numLevels) <= iPtr->maxNestingDepth)) { + if ((iPtr->numLevels <= iPtr->maxNestingDepth)) { return TCL_OK; } |