diff options
-rw-r--r-- | generic/tclHash.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclHash.c b/generic/tclHash.c index ea1b20e..385b9e4 100644 --- a/generic/tclHash.c +++ b/generic/tclHash.c @@ -649,15 +649,15 @@ Tcl_HashStats( */ result = (char *)ckalloc((NUM_COUNTERS * 60) + 300); - snprintf(result, 60, "%u entries in table, %u buckets\n", + snprintf(result, 60, "%" TCL_SIZE_MODIFIER "u entries in table, %" TCL_SIZE_MODIFIER "u buckets\n", tablePtr->numEntries, tablePtr->numBuckets); p = result + strlen(result); for (i = 0; i < NUM_COUNTERS; i++) { - snprintf(p, 60, "number of buckets with %u entries: %u\n", + snprintf(p, 60, "number of buckets with %" TCL_SIZE_MODIFIER "u entries: %" TCL_SIZE_MODIFIER "u\n", i, count[i]); p += strlen(p); } - snprintf(p, 60, "number of buckets with %u or more entries: %u\n", + snprintf(p, 60, "number of buckets with %d or more entries: %" TCL_SIZE_MODIFIER "u\n", NUM_COUNTERS, overflow); p += strlen(p); snprintf(p, 60, "average search distance for entry: %.1f", average); |