diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-11-24 20:55:43 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-11-24 20:55:43 (GMT) |
| commit | bd4ade16893719f146b31f467f5b1cbd2d7a393c (patch) | |
| tree | 967dd418feb0fbf2a9780dbab087770e2c0c7676 /generic | |
| parent | db2389176bddb30734048a790ac9e6c6f2ec5d45 (diff) | |
| parent | 088a851f2d1915d2ca3f3896feb454c3b96b0b18 (diff) | |
| download | tcl-bd4ade16893719f146b31f467f5b1cbd2d7a393c.zip tcl-bd4ade16893719f146b31f467f5b1cbd2d7a393c.tar.gz tcl-bd4ade16893719f146b31f467f5b1cbd2d7a393c.tar.bz2 | |
merge trunk
Diffstat (limited to 'generic')
| -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 88ff094..0d6da8e 100644 --- a/generic/tclDisassemble.c +++ b/generic/tclDisassemble.c @@ -272,8 +272,8 @@ DisassembleByteCodeObj( sprintf(ptrBuf1, "%p", codePtr); sprintf(ptrBuf2, "%p", iPtr); Tcl_AppendPrintfToObj(bufferObj, - "ByteCode 0x%s, refCt %" TCL_LL_MODIFIER "u, epoch %u, interp 0x%s (epoch %u)\n", - ptrBuf1, (Tcl_WideInt)codePtr->refCount, codePtr->compileEpoch, ptrBuf2, + "ByteCode 0x%s, refCt %u, epoch %u, interp 0x%s (epoch %u)\n", + ptrBuf1, codePtr->refCount, codePtr->compileEpoch, ptrBuf2, iPtr->compileEpoch); Tcl_AppendToObj(bufferObj, " Source ", -1); PrintSourceToObj(bufferObj, codePtr->source, |