diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-16 23:08:28 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-16 23:08:28 (GMT) |
| commit | 17098d70c767e79c2deb65981af371cb209cd159 (patch) | |
| tree | e7f309ada6cf0f56695900638d4b6015bb5269b1 /generic/tclRegexp.c | |
| parent | 459642686539ca9da0448167dbbf7fef7435f864 (diff) | |
| download | tcl-17098d70c767e79c2deb65981af371cb209cd159.zip tcl-17098d70c767e79c2deb65981af371cb209cd159.tar.gz tcl-17098d70c767e79c2deb65981af371cb209cd159.tar.bz2 | |
Handle Tcl_UtfAtIndex
Diffstat (limited to 'generic/tclRegexp.c')
| -rw-r--r-- | generic/tclRegexp.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclRegexp.c b/generic/tclRegexp.c index bb8a6ad..ff7c72c 100644 --- a/generic/tclRegexp.c +++ b/generic/tclRegexp.c @@ -271,8 +271,8 @@ Tcl_RegExpRange( } else { string = regexpPtr->string; } - *startPtr = Tcl_UtfAtIndex(string, regexpPtr->matches[index].rm_so); - *endPtr = Tcl_UtfAtIndex(string, regexpPtr->matches[index].rm_eo); + *startPtr = TclUtfAtIndex(string, regexpPtr->matches[index].rm_so); + *endPtr = TclUtfAtIndex(string, regexpPtr->matches[index].rm_eo); } } |