summaryrefslogtreecommitdiffstats
path: root/generic/tclEncoding.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2023-09-06 20:35:27 (GMT)
committerdgp <dgp@users.sourceforge.net>2023-09-06 20:35:27 (GMT)
commitacf03d58760b6b427d032736a1ae61b0e9f1220a (patch)
treea39d1803fadea4511e07f0995c0ed1ad7d0e0d95 /generic/tclEncoding.c
parent4b135ba7bf313f34c5718a14263a24b80ee103c8 (diff)
parent68037a7cc3e5b38365e10c6784fb856cbaf9008e (diff)
downloadtcl-acf03d58760b6b427d032736a1ae61b0e9f1220a.zip
tcl-acf03d58760b6b427d032736a1ae61b0e9f1220a.tar.gz
tcl-acf03d58760b6b427d032736a1ae61b0e9f1220a.tar.bz2
merge trunk
Diffstat (limited to 'generic/tclEncoding.c')
-rw-r--r--generic/tclEncoding.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c
index 6cec532..b6c6571 100644
--- a/generic/tclEncoding.c
+++ b/generic/tclEncoding.c
@@ -3234,7 +3234,7 @@ UtfToUtf16Proc(
}
dstStart = dst;
- dstEnd = dst + dstLen - sizeof(Tcl_UniChar);
+ dstEnd = dst + dstLen - 2; /* 2 -> sizeof a UTF-16 code unit */
flags |= PTR2INT(clientData);
result = TCL_OK;
@@ -3344,7 +3344,7 @@ UtfToUcs2Proc(
}
dstStart = dst;
- dstEnd = dst + dstLen - sizeof(Tcl_UniChar);
+ dstEnd = dst + dstLen - 2; /* 2 - size of UCS code unit */
result = TCL_OK;
for (numChars = 0; src < srcEnd; numChars++) {