diff options
author | bch <brad.harder@gmail.com> | 2019-06-06 03:47:33 (GMT) |
---|---|---|
committer | bch <brad.harder@gmail.com> | 2019-06-06 03:47:33 (GMT) |
commit | 9d7e696016d924ae175c552e503b4dfb2c806884 (patch) | |
tree | add07513b1dccc7de82ec38d40372a73856e5609 /generic/tclLiteral.c | |
parent | 10e31bc252115c3c1a4f1892c14c875e37af6e7a (diff) | |
download | tcl-9d7e696016d924ae175c552e503b4dfb2c806884.zip tcl-9d7e696016d924ae175c552e503b4dfb2c806884.tar.gz tcl-9d7e696016d924ae175c552e503b4dfb2c806884.tar.bz2 |
squelch int vs. long int (size_t) warings in comparison, format specifiers
Diffstat (limited to 'generic/tclLiteral.c')
-rw-r--r-- | generic/tclLiteral.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclLiteral.c b/generic/tclLiteral.c index 464f565..6358c7f 100644 --- a/generic/tclLiteral.c +++ b/generic/tclLiteral.c @@ -465,7 +465,7 @@ TclRegisterLiteral( #ifdef TCL_COMPILE_DEBUG if (globalPtr != NULL && globalPtr->refCount < 1) { - Tcl_Panic("%s: global literal \"%.*s\" had bad refCount %d", + Tcl_Panic("%s: global literal \"%.*s\" had bad refCount %ld", "TclRegisterLiteral", (length>60? 60 : length), bytes, globalPtr->refCount); } @@ -1174,9 +1174,9 @@ TclVerifyLocalLiteralTable( for (localPtr=localTablePtr->buckets[i] ; localPtr!=NULL; localPtr=localPtr->nextPtr) { count++; - if (localPtr->refCount != -1) { + if (localPtr->refCount != (size_t)-1) { bytes = TclGetStringFromObj(localPtr->objPtr, &length); - Tcl_Panic("%s: local literal \"%.*s\" had bad refCount %d", + Tcl_Panic("%s: local literal \"%.*s\" had bad refCount %ld", "TclVerifyLocalLiteralTable", (length>60? 60 : length), bytes, localPtr->refCount); } @@ -1227,7 +1227,7 @@ TclVerifyGlobalLiteralTable( count++; if (globalPtr->refCount < 1) { bytes = TclGetStringFromObj(globalPtr->objPtr, &length); - Tcl_Panic("%s: global literal \"%.*s\" had bad refCount %d", + Tcl_Panic("%s: global literal \"%.*s\" had bad refCount %ld", "TclVerifyGlobalLiteralTable", (length>60? 60 : length), bytes, globalPtr->refCount); } |