summaryrefslogtreecommitdiffstats
path: root/generic/tclUtil.c
diff options
context:
space:
mode:
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 0e3449d..450f3bf 100644
--- a/generic/tclUtil.c
+++ b/generic/tclUtil.c
@@ -1702,7 +1702,7 @@ TclTrimRight(
int pInc = 0, bytesLeft = numTrim;
pp = TclUtfPrev(p, bytes);
-#if TCL_UTF_MAX <= 4
+#if TCL_UTF_MAX < 4
pp = TclUtfPrev(pp, bytes);
#endif
do {
@@ -1715,14 +1715,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) {