diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-04-24 10:23:33 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-04-24 10:23:33 (GMT) |
commit | 9045c6ee8b78c7eb650a24f5459a2769ae7dd3e5 (patch) | |
tree | 3b98b64461c97646bdbd3e8235aad6b7bf1bb2c3 /generic/tclCmdMZ.c | |
parent | c6288678656a95f0ea4dd846a7479a2a27596abd (diff) | |
parent | b26879ed7753285181237335897881134b86de1b (diff) | |
download | tcl-9045c6ee8b78c7eb650a24f5459a2769ae7dd3e5.zip tcl-9045c6ee8b78c7eb650a24f5459a2769ae7dd3e5.tar.gz tcl-9045c6ee8b78c7eb650a24f5459a2769ae7dd3e5.tar.bz2 |
Merge 8.6. This mainly introduces the overlong check into Tcl_UtfPrev(). 10 testcase changed results, all of them due to the Tcl_UtfPrev() improvement. Tcl_UtfNext() is not affected: Previous implementation was based on Tcl_UtfToUniChar(), which already did this check.
Diffstat (limited to 'generic/tclCmdMZ.c')
-rw-r--r-- | generic/tclCmdMZ.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCmdMZ.c b/generic/tclCmdMZ.c index 935d42f..d7394fb 100644 --- a/generic/tclCmdMZ.c +++ b/generic/tclCmdMZ.c @@ -2529,7 +2529,7 @@ StringStartCmd( break; } - next = Tcl_UtfPrev(p, string); + next = TclUtfPrev(p, string); do { next += delta; delta = TclUtfToUCS4(next, &ch); |