diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-16 15:38:40 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-16 15:38:40 (GMT) |
commit | 88f9f54d4c4e23a4d20b82b40b385c6d558013f9 (patch) | |
tree | d890d8136f9a4560815a55ac814a72c5d82e0993 /generic | |
parent | 1eefaec4712a22b1cea12961deb534381158010e (diff) | |
parent | ae0471127efb9e3be2f45c25f91ba07f6a09eae5 (diff) | |
download | tcl-88f9f54d4c4e23a4d20b82b40b385c6d558013f9.zip tcl-88f9f54d4c4e23a4d20b82b40b385c6d558013f9.tar.gz tcl-88f9f54d4c4e23a4d20b82b40b385c6d558013f9.tar.bz2 |
Merge 8.7
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclTest.c | 4 |
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, |