summaryrefslogtreecommitdiffstats
path: root/generic/tclUtil.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2011-05-11 20:33:14 (GMT)
committerdgp <dgp@users.sourceforge.net>2011-05-11 20:33:14 (GMT)
commitd3f70de8a257035276be5a2d6af9bc5c21f5666c (patch)
tree619407cc2be5934eeb8535f68999d4b07c32cde5 /generic/tclUtil.c
parent1bcd13481e9aa88addeaa31790cf17ebd7607a4d (diff)
downloadtcl-d3f70de8a257035276be5a2d6af9bc5c21f5666c.zip
tcl-d3f70de8a257035276be5a2d6af9bc5c21f5666c.tar.gz
tcl-d3f70de8a257035276be5a2d6af9bc5c21f5666c.tar.bz2
First draft of bug fix.
Diffstat (limited to 'generic/tclUtil.c')
-rw-r--r--generic/tclUtil.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclUtil.c b/generic/tclUtil.c
index f7f4bf4..3b5b527 100644
--- a/generic/tclUtil.c
+++ b/generic/tclUtil.c
@@ -1786,7 +1786,7 @@ Tcl_ConcatObj(
/*
* Tcl_ListObjAppendList could be used here, but this saves us a
* bit of type checking (since we've already done it). Use of
- * INT_MAX tells us to always put the new stuff on the end. It
+ * LIST_MAX tells us to always put the new stuff on the end. It
* will be set right in Tcl_ListObjReplace.
* Note that all objs at this point are either lists or have an
* empty string rep.
@@ -1799,7 +1799,7 @@ Tcl_ConcatObj(
TclListObjGetElements(NULL, objPtr, &listc, &listv);
if (listc) {
if (resPtr) {
- Tcl_ListObjReplace(NULL, resPtr, INT_MAX, 0, listc, listv);
+ Tcl_ListObjReplace(NULL, resPtr, LIST_MAX, 0, listc, listv);
} else {
resPtr = TclListObjCopy(NULL, objPtr);
}