diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-07 20:13:24 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-07 20:13:24 (GMT) |
| commit | 73229a7e53190161f9fac4c02158d6a20645eab0 (patch) | |
| tree | 741cf370f0a04a846db70ed678808dc7c7cf9026 /generic/tclStringObj.c | |
| parent | f4618fc2d91563021eaec2308d4c7ff326e4e0e7 (diff) | |
| parent | 9aea48988c29a181e815be248de624c7bf29d5bc (diff) | |
| download | tcl-73229a7e53190161f9fac4c02158d6a20645eab0.zip tcl-73229a7e53190161f9fac4c02158d6a20645eab0.tar.gz tcl-73229a7e53190161f9fac4c02158d6a20645eab0.tar.bz2 | |
Merge 9.0
Diffstat (limited to 'generic/tclStringObj.c')
| -rw-r--r-- | generic/tclStringObj.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index e1376f4..0acc6e2 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -1683,7 +1683,7 @@ AppendUtfToUnicodeRep( return; } - ExtendUnicodeRepWithString(objPtr, bytes, numBytes, -1); + ExtendUnicodeRepWithString(objPtr, bytes, numBytes, TCL_INDEX_NONE); TclInvalidateStringRep(objPtr); stringPtr = GET_STRING(objPtr); stringPtr->allocated = 0; @@ -1812,7 +1812,7 @@ Tcl_AppendStringsToObj( if (bytes == NULL) { break; } - Tcl_AppendToObj(objPtr, bytes, -1); + Tcl_AppendToObj(objPtr, bytes, TCL_INDEX_NONE); } va_end(argList); } @@ -2588,7 +2588,7 @@ Tcl_AppendFormatToObj( errorMsg: if (interp != NULL) { - Tcl_SetObjResult(interp, Tcl_NewStringObj(msg, -1)); + Tcl_SetObjResult(interp, Tcl_NewStringObj(msg, TCL_INDEX_NONE)); Tcl_SetErrorCode(interp, "TCL", "FORMAT", errCode, NULL); } error: |