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 | da3723c942a7bfca105f8b2856fdc9b1fd1cf095 (patch) | |
| tree | 18921c9adfee8ca44288096b12a6add494295f8b | |
| parent | a188ceee2158cb9446f926f4d950a3a98377b988 (diff) | |
| download | tcl-da3723c942a7bfca105f8b2856fdc9b1fd1cf095.zip tcl-da3723c942a7bfca105f8b2856fdc9b1fd1cf095.tar.gz tcl-da3723c942a7bfca105f8b2856fdc9b1fd1cf095.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() |