diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-08-25 20:46:41 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-08-25 20:46:41 (GMT) |
| commit | 143111498e3979e4fdec779ec707746b70a56e0c (patch) | |
| tree | 27ecfbc3c6dab3eaf51f2e8df1186dda00516173 /generic/tclDisassemble.c | |
| parent | abe4d4223da114bb82cca35dc22618f25847668f (diff) | |
| parent | ec609cef016b8d3c191e599f4ca70aace4e11c53 (diff) | |
| download | tcl-143111498e3979e4fdec779ec707746b70a56e0c.zip tcl-143111498e3979e4fdec779ec707746b70a56e0c.tar.gz tcl-143111498e3979e4fdec779ec707746b70a56e0c.tar.bz2 | |
Merge 8.7
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), |