diff options
Diffstat (limited to 'generic/tclDisassemble.c')
| -rw-r--r-- | generic/tclDisassemble.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclDisassemble.c b/generic/tclDisassemble.c index 05eee35..469089a 100644 --- a/generic/tclDisassemble.c +++ b/generic/tclDisassemble.c @@ -270,7 +270,7 @@ DisassembleByteCodeObj( codeStart = codePtr->codeStart; codeLimit = codeStart + codePtr->numCodeBytes; - numCmds = (int)codePtr->numCommands; + numCmds = codePtr->numCommands; /* * Print header lines describing the ByteCode. @@ -294,7 +294,7 @@ DisassembleByteCodeObj( codePtr->maxStackDepth, #ifdef TCL_COMPILE_STATS codePtr->numSrcBytes? - codePtr->structureSize/(float)(int)codePtr->numSrcBytes : + codePtr->structureSize/(float)codePtr->numSrcBytes : #endif 0.0); |