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)
commit3f3dfa54cb349fb5d39961cd23c82d600247e9e7 (patch)
treea39d1803fadea4511e07f0995c0ed1ad7d0e0d95 /generic/tclEncoding.c
parent4b135ba7bf313f34c5718a14263a24b80ee103c8 (diff)
parentbec1da2042481302d3230238bdf8e1d17ecae317 (diff)
downloadtcl-3f3dfa54cb349fb5d39961cd23c82d600247e9e7.zip
tcl-3f3dfa54cb349fb5d39961cd23c82d600247e9e7.tar.gz
tcl-3f3dfa54cb349fb5d39961cd23c82d600247e9e7.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++) {