diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-16 11:29:14 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-16 11:29:14 (GMT) |
commit | e019e5bd1d3ddb51539ca9e4872e6c9d310dd390 (patch) | |
tree | c5b4c6a12e3fa0c12c45d24b7ca875754893b9f1 /generic | |
parent | 5846b1666f9fda4d12d9cc46f8bd2050b1ed4ef4 (diff) | |
download | tcl-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.c | 4 |
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, |