diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-04-24 13:31:53 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-04-24 13:31:53 (GMT) |
| commit | adb2d1d9399a44ba950ed6f2c064c1509dffde87 (patch) | |
| tree | fc91d4afeccb236ccab7243a2897a0e82cecf6c9 /generic/tclUtf.c | |
| parent | da116b95a31241dc3abb6eed7d8f8eb3a9487232 (diff) | |
| parent | f0b58b55b62e4dea5694b49b1bd846839cbef1f3 (diff) | |
| download | tcl-adb2d1d9399a44ba950ed6f2c064c1509dffde87.zip tcl-adb2d1d9399a44ba950ed6f2c064c1509dffde87.tar.gz tcl-adb2d1d9399a44ba950ed6f2c064c1509dffde87.tar.bz2 | |
Merge 8.6
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 20b0ebe..3d44b66 100644 --- a/generic/tclUtf.c +++ b/generic/tclUtf.c @@ -956,7 +956,7 @@ Tcl_UtfNext( } next++; } - if (Invalid((unsigned char *)src)) { + if ((next == src + 1) || Invalid((unsigned char *)src)) { return src + 1; } return next; |