summaryrefslogtreecommitdiffstats
path: root/generic/tclTest.c
diff options
context:
space:
mode:
authorapnadkarni <apnmbx-wits@yahoo.com>2023-03-16 17:29:12 (GMT)
committerapnadkarni <apnmbx-wits@yahoo.com>2023-03-16 17:29:12 (GMT)
commit5655318f50b3bc51f8cba32759e01ae8c7694cc9 (patch)
tree00a3c065ecacd8eaed206f6dda391d4e9c82c54b /generic/tclTest.c
parenta3c59e320df775f0d6849e5d3163292280b3b386 (diff)
parentae0471127efb9e3be2f45c25f91ba07f6a09eae5 (diff)
downloadtcl-5655318f50b3bc51f8cba32759e01ae8c7694cc9.zip
tcl-5655318f50b3bc51f8cba32759e01ae8c7694cc9.tar.gz
tcl-5655318f50b3bc51f8cba32759e01ae8c7694cc9.tar.bz2
Merge 8.7
Diffstat (limited to 'generic/tclTest.c')
-rw-r--r--generic/tclTest.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c
index 522e6f8..f68029a 100644
--- a/generic/tclTest.c
+++ b/generic/tclTest.c
@@ -2122,7 +2122,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;
@@ -2210,7 +2210,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,