diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-08-29 10:00:23 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-08-29 10:00:23 (GMT) |
| commit | dc471da4331df6c6ec520bf55f7b5ce7f6490bdf (patch) | |
| tree | cbfed49668e3100f7d926a2f7701d4914d798633 /generic/tclDisassemble.c | |
| parent | 4e9c7a9ae0adaee122394db9ebf41650340fe023 (diff) | |
| parent | f0a6c93a0e89c86140a0c5f3a19db9c38628d1d8 (diff) | |
| download | tcl-dc471da4331df6c6ec520bf55f7b5ce7f6490bdf.zip tcl-dc471da4331df6c6ec520bf55f7b5ce7f6490bdf.tar.gz tcl-dc471da4331df6c6ec520bf55f7b5ce7f6490bdf.tar.bz2 | |
Merge 9.0
Diffstat (limited to 'generic/tclDisassemble.c')
| -rw-r--r-- | generic/tclDisassemble.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/generic/tclDisassemble.c b/generic/tclDisassemble.c index 6fdc488..8fd90a3 100644 --- a/generic/tclDisassemble.c +++ b/generic/tclDisassemble.c @@ -300,9 +300,10 @@ DisassembleByteCodeObj( #ifdef TCL_COMPILE_STATS Tcl_AppendPrintfToObj(bufferObj, - " Code %" TCL_Z_MODIFIER "u = header %" TCL_Z_MODIFIER "u+inst %" TCL_Z_MODIFIER "u+litObj %" TCL_Z_MODIFIER "u+exc %" TCL_Z_MODIFIER "u+aux %" TCL_Z_MODIFIER "u+cmdMap %" TCL_Z_MODIFIER "u\n", + " Code %" TCL_Z_MODIFIER "u = header %" TCL_Z_MODIFIER "u+inst %" TCL_Z_MODIFIER "u+litObj %" + TCL_Z_MODIFIER "u+exc %" TCL_Z_MODIFIER "u+aux %" TCL_Z_MODIFIER "u+cmdMap %" TCL_Z_MODIFIER "u\n", codePtr->structureSize, - sizeof(ByteCode) - sizeof(size_t) - sizeof(Tcl_Time), + offsetof(ByteCode, localCachePtr), codePtr->numCodeBytes, codePtr->numLitObjects * sizeof(Tcl_Obj *), codePtr->numExceptRanges*sizeof(ExceptionRange), |