diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-24 13:18:33 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-24 13:18:33 (GMT) |
| commit | 53f15cc67318ebe942c270c60268b0396688befc (patch) | |
| tree | 195a11dc8cbc443387b34f1a9c0cf43dcd1f6f6f /generic/tclStringObj.c | |
| parent | bab10ccf5c152dec04a0eed4fac248b749af4fd9 (diff) | |
| download | tcl-53f15cc67318ebe942c270c60268b0396688befc.zip tcl-53f15cc67318ebe942c270c60268b0396688befc.tar.gz tcl-53f15cc67318ebe942c270c60268b0396688befc.tar.bz2 | |
Fix internal usage of Tcl_GetRange/Tcl_UtfAtIndex
Diffstat (limited to 'generic/tclStringObj.c')
| -rw-r--r-- | generic/tclStringObj.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index 332d1d2..6032dbb 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -2449,7 +2449,7 @@ Tcl_AppendFormatToObj( if (precision < 1) { TclNewObj(segment); } else { - segment = Tcl_GetRange(segment, 0, precision - 1); + segment = TclGetRange(segment, 0, precision - 1); } numChars = precision; Tcl_IncrRefCount(segment); |