summaryrefslogtreecommitdiffstats
path: root/generic/tclResult.c
diff options
context:
space:
mode:
authorapnadkarni <apnmbx-wits@yahoo.com>2023-04-21 06:16:53 (GMT)
committerapnadkarni <apnmbx-wits@yahoo.com>2023-04-21 06:16:53 (GMT)
commitc7f27e3c8788c57a0e58d4b31140a4c4652a422f (patch)
treeb75c4e99c0169e29c90064020a7e6b69e081544c /generic/tclResult.c
parente86259d193d2c7ad6628755161cc75a706e194cb (diff)
downloadtcl-c7f27e3c8788c57a0e58d4b31140a4c4652a422f.zip
tcl-c7f27e3c8788c57a0e58d4b31140a4c4652a422f.tar.gz
tcl-c7f27e3c8788c57a0e58d4b31140a4c4652a422f.tar.bz2
Fix warnings generated on disable8api builds
Diffstat (limited to 'generic/tclResult.c')
-rw-r--r--generic/tclResult.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclResult.c b/generic/tclResult.c
index 29c36d1..c06a73a 100644
--- a/generic/tclResult.c
+++ b/generic/tclResult.c
@@ -354,7 +354,7 @@ Tcl_AppendElement(
Tcl_Obj *elementPtr = Tcl_NewStringObj(element, -1);
Tcl_Obj *listPtr = Tcl_NewListObj(1, &elementPtr);
const char *bytes;
- size_t length;
+ Tcl_Size length;
if (Tcl_IsShared(iPtr->objResultPtr)) {
Tcl_SetObjResult(interp, Tcl_DuplicateObj(iPtr->objResultPtr));
@@ -718,7 +718,7 @@ TclProcessReturn(
Tcl_DictObjGet(NULL, iPtr->returnOpts, keys[KEY_ERRORINFO],
&valuePtr);
if (valuePtr != NULL) {
- size_t length;
+ Tcl_Size length;
(void) Tcl_GetStringFromObj(valuePtr, &length);
if (length) {