diff options
| author | apnadkarni <apnmbx-wits@yahoo.com> | 2023-03-16 18:11:08 (GMT) |
|---|---|---|
| committer | apnadkarni <apnmbx-wits@yahoo.com> | 2023-03-16 18:11:08 (GMT) |
| commit | e7fc2e1e1d845b964cbf8c084865e83d1ced239f (patch) | |
| tree | cbf743d53c85e2e497a9a02a5afdb5750d86c25b /generic/tclTest.c | |
| parent | 527e79c3a8b0d8df5cce3676a94700785584ef06 (diff) | |
| parent | 88f9f54d4c4e23a4d20b82b40b385c6d558013f9 (diff) | |
| download | tcl-e7fc2e1e1d845b964cbf8c084865e83d1ced239f.zip tcl-e7fc2e1e1d845b964cbf8c084865e83d1ced239f.tar.gz tcl-e7fc2e1e1d845b964cbf8c084865e83d1ced239f.tar.bz2 | |
Merge 9.0
Diffstat (limited to 'generic/tclTest.c')
| -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 459461f..590b0c8 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -2086,7 +2086,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; @@ -2174,7 +2174,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, |