diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-11-04 14:54:38 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-11-04 14:54:38 (GMT) |
| commit | 1c9ca6b643b52cbe7a965109dbda2a25c6aa65ff (patch) | |
| tree | 18921c9adfee8ca44288096b12a6add494295f8b | |
| parent | b94e244508854aab209a3aa83cc0f559f974f6c9 (diff) | |
| download | tcl-1c9ca6b643b52cbe7a965109dbda2a25c6aa65ff.zip tcl-1c9ca6b643b52cbe7a965109dbda2a25c6aa65ff.tar.gz tcl-1c9ca6b643b52cbe7a965109dbda2a25c6aa65ff.tar.bz2 | |
[8245752f10e] Use LIST_MAX instead of INT_MAX for unknown number of elements
to the end of the list.
| -rw-r--r-- | generic/tclEnsemble.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclEnsemble.c b/generic/tclEnsemble.c index 6fedf29..c1b0890 100644 --- a/generic/tclEnsemble.c +++ b/generic/tclEnsemble.c @@ -3135,7 +3135,7 @@ TclCompileEnsemble( * any extra elements that might have been appended by failing * pathways above. */ - (void) Tcl_ListObjReplace(NULL, replaced, depth-1, INT_MAX, 0, NULL); + (void) Tcl_ListObjReplace(NULL, replaced, depth-1, LIST_MAX, 0, NULL); /* * TODO: Reconsider whether we ought to call CompileToInvokedCommand() |