summaryrefslogtreecommitdiffstats
path: root/generic/tclUtil.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2021-02-16 09:11:54 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2021-02-16 09:11:54 (GMT)
commit94c40f8b7100eb40e174041600f31ec60c4b7bc2 (patch)
tree5276bd593c3580934e1d5d617de496d08ac42d13 /generic/tclUtil.c
parent90565904aa22260e8bdee126a55ed12fc12c94d6 (diff)
parent635b0327a6edcdd57f406ec19bf6f3659756c2ce (diff)
downloadtcl-94c40f8b7100eb40e174041600f31ec60c4b7bc2.zip
tcl-94c40f8b7100eb40e174041600f31ec60c4b7bc2.tar.gz
tcl-94c40f8b7100eb40e174041600f31ec60c4b7bc2.tar.bz2
Merge 8.7
Diffstat (limited to 'generic/tclUtil.c')
-rw-r--r--generic/tclUtil.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclUtil.c b/generic/tclUtil.c
index 1decb05..d5ec040 100644
--- a/generic/tclUtil.c
+++ b/generic/tclUtil.c
@@ -1718,14 +1718,14 @@ TclTrimRight(
*/
do {
- int qInc = TclUtfToUCS4(q, &ch2);
+ pInc = TclUtfToUCS4(q, &ch2);
if (ch1 == ch2) {
break;
}
- q += qInc;
- bytesLeft -= qInc;
+ q += pInc;
+ bytesLeft -= pInc;
} while (bytesLeft);
if (bytesLeft == 0) {
@@ -1771,7 +1771,7 @@ TclTrimLeft(
* rely on (trim[numTrim] == '\0'). */
{
const char *p = bytes;
- int ch1, ch2;
+ int ch1, ch2;
/* Empty strings -> nothing to do */
if ((numBytes == 0) || (numTrim == 0)) {