diff options
author | dgp <dgp@users.sourceforge.net> | 2011-07-12 14:42:55 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2011-07-12 14:42:55 (GMT) |
commit | 83f26b7bb9f1577ece6f41ec74c774939dcda9fc (patch) | |
tree | 81f6aad56c98cd8c2b04f73346041b39fe6528c1 /generic | |
parent | 37aae8f3d442bad8642367cf15ecf5e4e55e8b2c (diff) | |
download | tcl-83f26b7bb9f1577ece6f41ec74c774939dcda9fc.zip tcl-83f26b7bb9f1577ece6f41ec74c774939dcda9fc.tar.gz tcl-83f26b7bb9f1577ece6f41ec74c774939dcda9fc.tar.bz2 |
wip
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclCompile.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c index 63dbb2e..f29c54e 100644 --- a/generic/tclCompile.c +++ b/generic/tclCompile.c @@ -3555,13 +3555,13 @@ TclPrintByteCodeObj(interp, objPtr) #endif #ifdef TCL_COMPILE_STATS fprintf(stdout, - " Code %ld = header %lu+inst %d+litObj %lu+exc %lu+aux %lu+cmdMap %d\n", - codePtr->structureSize, - (sizeof(ByteCode) - (sizeof(size_t) + sizeof(Tcl_Time))), + " Code %u = header %u+inst %d+litObj %lu+exc %lu+aux %lu+cmdMap %d\n", + (unsigned int)codePtr->structureSize, + (unsigned int)(sizeof(ByteCode) - (sizeof(size_t) + sizeof(Tcl_Time))), codePtr->numCodeBytes, - (codePtr->numLitObjects * sizeof(Tcl_Obj *)), - (codePtr->numExceptRanges * sizeof(ExceptionRange)), - (codePtr->numAuxDataItems * sizeof(AuxData)), + (unsigned long)(codePtr->numLitObjects * sizeof(Tcl_Obj *)), + (unsigned long)(codePtr->numExceptRanges * sizeof(ExceptionRange)), + (unsigned long)(codePtr->numAuxDataItems * sizeof(AuxData)), codePtr->numCmdLocBytes); #endif /* TCL_COMPILE_STATS */ |