summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-22 17:50:05 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-22 17:50:05 (GMT)
commitdedbaf0009124faf33dcc67e274c239b4f8574be (patch)
tree0771488bbbe13e42369bc0730965cc4eaa786854
parent453c27a88e9da3cb50fefe2c4a5fb7a7d09b8afc (diff)
parent636a6d0ea9adb390d44601c064d8e9e134d83583 (diff)
downloadtcl-dedbaf0009124faf33dcc67e274c239b4f8574be.zip
tcl-dedbaf0009124faf33dcc67e274c239b4f8574be.tar.gz
tcl-dedbaf0009124faf33dcc67e274c239b4f8574be.tar.bz2
Fix [0265750233]: invalid read in cmdAH-4.3.13.C1.solo.utf-8.tcl8
-rw-r--r--generic/tclUtf.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclUtf.c b/generic/tclUtf.c
index e4d0fc8..33a7b1d 100644
--- a/generic/tclUtf.c
+++ b/generic/tclUtf.c
@@ -419,7 +419,7 @@ Tcl_UtfToUniChar(
*chPtr = byte;
return 1;
} else if (byte < 0xE0) {
- if ((src[1] & 0xC0) == 0x80) {
+ if ((byte != 0xC1) && ((src[1] & 0xC0) == 0x80)) {
/*
* Two-byte-character lead-byte followed by a trail-byte.
*/