summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-16 15:38:40 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-16 15:38:40 (GMT)
commit88f9f54d4c4e23a4d20b82b40b385c6d558013f9 (patch)
treed890d8136f9a4560815a55ac814a72c5d82e0993 /generic
parent1eefaec4712a22b1cea12961deb534381158010e (diff)
parentae0471127efb9e3be2f45c25f91ba07f6a09eae5 (diff)
downloadtcl-88f9f54d4c4e23a4d20b82b40b385c6d558013f9.zip
tcl-88f9f54d4c4e23a4d20b82b40b385c6d558013f9.tar.gz
tcl-88f9f54d4c4e23a4d20b82b40b385c6d558013f9.tar.bz2
Merge 8.7
Diffstat (limited to 'generic')
-rw-r--r--generic/tclTest.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c
index f7854ac..9f63d06 100644
--- a/generic/tclTest.c
+++ b/generic/tclTest.c
@@ -2083,7 +2083,7 @@ static int UtfExtWrapper(
/* Assumes state is integer if not "" */
Tcl_WideInt wide;
if (Tcl_GetWideIntFromObj(interp, objv[5], &wide) == TCL_OK) {
- encState = (Tcl_EncodingState) wide;
+ encState = (Tcl_EncodingState)(size_t)wide;
encStatePtr = &encState;
} else if (Tcl_GetCharLength(objv[5]) == 0) {
encStatePtr = NULL;
@@ -2173,7 +2173,7 @@ static int UtfExtWrapper(
}
result = TCL_OK;
resultObjs[1] =
- encStatePtr ? Tcl_NewWideIntObj((Tcl_WideInt)encState) : Tcl_NewObj();
+ encStatePtr ? Tcl_NewWideIntObj((Tcl_WideInt)(size_t)encState) : Tcl_NewObj();
resultObjs[2] = Tcl_NewByteArrayObj(bufPtr, dstLen);
if (srcReadVar) {
if (Tcl_ObjSetVar2(interp,