diff options
-rw-r--r-- | generic/tclLiteral.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/generic/tclLiteral.c b/generic/tclLiteral.c index dc8770d..03200ca 100644 --- a/generic/tclLiteral.c +++ b/generic/tclLiteral.c @@ -426,7 +426,7 @@ TclRegisterLiteral( } else { nsPtr = NULL; } - + /* * Is it in the interpreter's global literal table? If not, create it. */ @@ -938,7 +938,8 @@ RebuildLiteralTable( register LiteralEntry *entryPtr; LiteralEntry **bucketPtr; const char *bytes; - int oldSize, count, index, length; + unsigned int oldSize; + int count, index, length; oldSize = tablePtr->numBuckets; oldBuckets = tablePtr->buckets; @@ -1007,7 +1008,7 @@ RebuildLiteralTable( * Results: * None. * - * Side effects: + * Side effects: * Resets the internal representation of the CmdName Tcl_Obj * using TclFreeIntRep(). * |