summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-16 11:29:14 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-16 11:29:14 (GMT)
commite019e5bd1d3ddb51539ca9e4872e6c9d310dd390 (patch)
treec5b4c6a12e3fa0c12c45d24b7ca875754893b9f1 /generic
parent5846b1666f9fda4d12d9cc46f8bd2050b1ed4ef4 (diff)
downloadtcl-e019e5bd1d3ddb51539ca9e4872e6c9d310dd390.zip
tcl-e019e5bd1d3ddb51539ca9e4872e6c9d310dd390.tar.gz
tcl-e019e5bd1d3ddb51539ca9e4872e6c9d310dd390.tar.bz2
Fix (minor) warning on 32-bit platforms
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 668a05a..15eaa56 100644
--- a/generic/tclTest.c
+++ b/generic/tclTest.c
@@ -2119,7 +2119,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;
@@ -2209,7 +2209,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,