diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-07-09 12:54:24 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-07-09 12:54:24 (GMT) |
| commit | af99fa7f7f426f932103c240518cca638f199ad9 (patch) | |
| tree | ad88f5fdada2be2f41948c3ba4db920710256beb /generic | |
| parent | 3f0dc94455d09a6beaad1a806ba3f6531e49909f (diff) | |
| download | tcl-af99fa7f7f426f932103c240518cca638f199ad9.zip tcl-af99fa7f7f426f932103c240518cca638f199ad9.tar.gz tcl-af99fa7f7f426f932103c240518cca638f199ad9.tar.bz2 | |
missed a few
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclStringObj.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index 2562ddd..20da88f 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -661,7 +661,7 @@ Tcl_GetCharLength( (void) Tcl_GetByteArrayFromObj(objPtr, &numChars); } else { Tcl_GetString(objPtr); - numChars = Tcl_NumUtfChars(objPtr->bytes, objPtr->length); + numChars = TclNumUtfChars(objPtr->bytes, objPtr->length); } return numChars; @@ -696,7 +696,7 @@ TclCheckEmptyString( } if (TclIsPureByteArray(objPtr) - && Tcl_GetCharLength(objPtr) == 0) { + && TclGetCharLength(objPtr) == 0) { return TCL_EMPTYSTRING_YES; } @@ -1019,7 +1019,7 @@ Tcl_GetRange( return Tcl_NewByteArrayObj(bytes + first, last - first + 1); } - int numChars = Tcl_NumUtfChars(objPtr->bytes, objPtr->length); + int numChars = TclNumUtfChars(objPtr->bytes, objPtr->length); if (last < 0 || last >= numChars) { last = numChars - 1; @@ -3966,8 +3966,8 @@ TclStringCmp( if ((reqlength < 0) && !nocase) { memCmpFn = (memCmpFn_t)(void *)TclpUtfNcmp2; } else { - s1len = Tcl_NumUtfChars(s1, s1len); - s2len = Tcl_NumUtfChars(s2, s2len); + s1len = TclNumUtfChars(s1, s1len); + s2len = TclNumUtfChars(s2, s2len); memCmpFn = (memCmpFn_t)(void *) (nocase ? Tcl_UtfNcasecmp : Tcl_UtfNcmp); } |