summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorsebres <sebres@users.sourceforge.net>2017-06-06 09:01:18 (GMT)
committersebres <sebres@users.sourceforge.net>2017-06-06 09:01:18 (GMT)
commit449b9c2c29e600d4e02c0430f360262aabc2ddb7 (patch)
tree0d0e769fb4588739cf87fe3cfd3e1e860d99541f
parent1172340e247bd64f10a4c5e5b812bd5283ffbb83 (diff)
downloadtcl-449b9c2c29e600d4e02c0430f360262aabc2ddb7.zip
tcl-449b9c2c29e600d4e02c0430f360262aabc2ddb7.tar.gz
tcl-449b9c2c29e600d4e02c0430f360262aabc2ddb7.tar.bz2
amend to [eac4656f1e8cf793] (moved to scope where numChars != 0 in Unicode case)
-rw-r--r--generic/tclStringObj.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c
index c1c15f2..6332e9f 100644
--- a/generic/tclStringObj.c
+++ b/generic/tclStringObj.c
@@ -2930,9 +2930,9 @@ TclStringCatObjv(
if (length == 0) {
first = last;
}
- }
- if ((length += numChars) < 0) {
- break; /* overflow */
+ if ((length += numChars) < 0) {
+ break; /* overflow */
+ }
}
}
}