summaryrefslogtreecommitdiffstats
path: root/generic/tclResult.c
diff options
context:
space:
mode:
authorapnadkarni <apnmbx-wits@yahoo.com>2023-04-23 08:13:11 (GMT)
committerapnadkarni <apnmbx-wits@yahoo.com>2023-04-23 08:13:11 (GMT)
commit2b41b2d12bf50d873436d0ce09e1e7b8345d5540 (patch)
tree6fb5f61f31dda4cc65bf9b4b66a9c598995749fe /generic/tclResult.c
parent9cd23041f3a73559c43adb6120b1ccdf4bd15604 (diff)
parent6f566fc406752600f7ae67df0c7356d987b753fe (diff)
downloadtcl-2b41b2d12bf50d873436d0ce09e1e7b8345d5540.zip
tcl-2b41b2d12bf50d873436d0ce09e1e7b8345d5540.tar.gz
tcl-2b41b2d12bf50d873436d0ce09e1e7b8345d5540.tar.bz2
Fix gcc type mismatch warnings exposed by disabling casts using disabletcl8api
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) {