summaryrefslogtreecommitdiffstats
path: root/generic/tclCmdMZ.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-04-24 10:23:33 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-04-24 10:23:33 (GMT)
commit9045c6ee8b78c7eb650a24f5459a2769ae7dd3e5 (patch)
tree3b98b64461c97646bdbd3e8235aad6b7bf1bb2c3 /generic/tclCmdMZ.c
parentc6288678656a95f0ea4dd846a7479a2a27596abd (diff)
parentb26879ed7753285181237335897881134b86de1b (diff)
downloadtcl-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.c2
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);