diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-22 16:36:22 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-22 16:36:22 (GMT) |
| commit | 636a6d0ea9adb390d44601c064d8e9e134d83583 (patch) | |
| tree | 93f9322dd5298ddb77c1ff3d4f96652ca4ed8042 /generic/tclUtf.c | |
| parent | f1fafe7c16c654a9f7f65644db877071980b8a5d (diff) | |
| download | tcl-636a6d0ea9adb390d44601c064d8e9e134d83583.zip tcl-636a6d0ea9adb390d44601c064d8e9e134d83583.tar.gz tcl-636a6d0ea9adb390d44601c064d8e9e134d83583.tar.bz2 | |
Proposed fix for [0265750233]: invalid read in cmdAH-4.3.13.C1.solo.utf-8.tcl8.
Diffstat (limited to 'generic/tclUtf.c')
| -rw-r--r-- | generic/tclUtf.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclUtf.c b/generic/tclUtf.c index cb8bb3e..f0135e4 100644 --- a/generic/tclUtf.c +++ b/generic/tclUtf.c @@ -464,7 +464,7 @@ Tcl_UtfToUniChar( } 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. */ |