diff options
author | apnadkarni <apnmbx-wits@yahoo.com> | 2023-04-21 06:16:53 (GMT) |
---|---|---|
committer | apnadkarni <apnmbx-wits@yahoo.com> | 2023-04-21 06:16:53 (GMT) |
commit | c7f27e3c8788c57a0e58d4b31140a4c4652a422f (patch) | |
tree | b75c4e99c0169e29c90064020a7e6b69e081544c /generic/tclLiteral.c | |
parent | e86259d193d2c7ad6628755161cc75a706e194cb (diff) | |
download | tcl-c7f27e3c8788c57a0e58d4b31140a4c4652a422f.zip tcl-c7f27e3c8788c57a0e58d4b31140a4c4652a422f.tar.gz tcl-c7f27e3c8788c57a0e58d4b31140a4c4652a422f.tar.bz2 |
Fix warnings generated on disable8api builds
Diffstat (limited to 'generic/tclLiteral.c')
-rw-r--r-- | generic/tclLiteral.c | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/generic/tclLiteral.c b/generic/tclLiteral.c index d04776a..7ddb88a 100644 --- a/generic/tclLiteral.c +++ b/generic/tclLiteral.c @@ -560,7 +560,8 @@ TclHideLiteral( { LiteralEntry **nextPtrPtr, *entryPtr, *lPtr; LiteralTable *localTablePtr = &envPtr->localLitTable; - size_t localHash, length; + size_t localHash; + Tcl_Size length; const char *bytes; Tcl_Obj *newObjPtr; @@ -837,7 +838,8 @@ TclReleaseLiteral( LiteralTable *globalTablePtr; LiteralEntry *entryPtr, *prevPtr; const char *bytes; - size_t length, index; + size_t index; + Tcl_Size length; if (iPtr == NULL) { goto done; @@ -980,7 +982,8 @@ RebuildLiteralTable( LiteralEntry *entryPtr; LiteralEntry **bucketPtr; const char *bytes; - size_t oldSize, count, index, length; + size_t oldSize, count, index; + Tcl_Size length; oldSize = tablePtr->numBuckets; oldBuckets = tablePtr->buckets; |