summaryrefslogtreecommitdiffstats
path: root/generic/tclLink.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/tclLink.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/tclLink.c')
-rw-r--r--generic/tclLink.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclLink.c b/generic/tclLink.c
index 1cd5f15..7474769 100644
--- a/generic/tclLink.c
+++ b/generic/tclLink.c
@@ -592,7 +592,7 @@ SetInvalidRealFromAny(
{
const char *str;
const char *endPtr;
- size_t length;
+ Tcl_Size length;
str = Tcl_GetStringFromObj(objPtr, &length);
if ((length == 1) && (str[0] == '.')) {
@@ -638,7 +638,7 @@ GetInvalidIntFromObj(
Tcl_Obj *objPtr,
int *intPtr)
{
- size_t length;
+ Tcl_Size length;
const char *str = Tcl_GetStringFromObj(objPtr, &length);
if ((length == 0) || ((length == 2) && (str[0] == '0')