diff options
| author | dgp <dgp@users.sourceforge.net> | 2011-07-12 16:05:43 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2011-07-12 16:05:43 (GMT) |
| commit | a794c019fc0416aa27cb0dde1889e3486725aa4c (patch) | |
| tree | f6c583ac1ec4985f3cd1d3eac93ce909c3f86436 /generic/tclCompile.c | |
| parent | ab10db7f7cc5c8ab1e1716443f808e4d99f1f8ef (diff) | |
| download | tcl-a794c019fc0416aa27cb0dde1889e3486725aa4c.zip tcl-a794c019fc0416aa27cb0dde1889e3486725aa4c.tar.gz tcl-a794c019fc0416aa27cb0dde1889e3486725aa4c.tar.bz2 | |
platform portable type matching in debug prints
Diffstat (limited to 'generic/tclCompile.c')
| -rw-r--r-- | generic/tclCompile.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c index 0eaf834..18679b2 100644 --- a/generic/tclCompile.c +++ b/generic/tclCompile.c @@ -2468,7 +2468,7 @@ TclInitByteCodeObj( #else nextPtr = EncodeCmdLocMap(envPtr, codePtr, (unsigned char *) p); if (((size_t)(nextPtr - p)) != cmdLocBytes) { - Tcl_Panic("TclInitByteCodeObj: encoded cmd location bytes %d != expected size %d", (nextPtr - p), cmdLocBytes); + Tcl_Panic("TclInitByteCodeObj: encoded cmd location bytes %lu != expected size %lu", (unsigned long)(nextPtr - p), (unsigned long)cmdLocBytes); } #endif |