diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-05-13 10:19:27 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-05-13 10:19:27 (GMT) |
commit | 1997c5874fe102757dcfed67aa1e4591add309fb (patch) | |
tree | ce3b1ab109b051d7599ec07ce559a1d1ce491a2a /generic | |
parent | edef93966879d501b92b245dc89aabc37bd58f79 (diff) | |
download | tcl-1997c5874fe102757dcfed67aa1e4591add309fb.zip tcl-1997c5874fe102757dcfed67aa1e4591add309fb.tar.gz tcl-1997c5874fe102757dcfed67aa1e4591add309fb.tar.bz2 |
One Tcl_UtfPrev() -> TclUtfPrev() change. Just a little bit cheaper.
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclIndexObj.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclIndexObj.c b/generic/tclIndexObj.c index ba02453..b200f6f 100644 --- a/generic/tclIndexObj.c +++ b/generic/tclIndexObj.c @@ -780,7 +780,7 @@ PrefixLongestObjCmd( * Adjust in case we stopped in the middle of a UTF char. */ - resultLength = Tcl_UtfPrev(&resultString[i+1], + resultLength = TclUtfPrev(&resultString[i+1], resultString) - resultString; break; } |