diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-05-27 11:24:32 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-05-27 11:24:32 (GMT) |
| commit | 808ba1a114ef2a656b7c28acce4fc65813fa1a48 (patch) | |
| tree | 1bbd46a3d4f7668cd8613b56e9e4ba34caf97754 /generic/tclAssembly.c | |
| parent | 09f254545c234fbd9bf3545493557f01d005899e (diff) | |
| parent | 1019fc7dc38c97beab50b4151eaccf9de1174683 (diff) | |
| download | tcl-808ba1a114ef2a656b7c28acce4fc65813fa1a48.zip tcl-808ba1a114ef2a656b7c28acce4fc65813fa1a48.tar.gz tcl-808ba1a114ef2a656b7c28acce4fc65813fa1a48.tar.bz2 | |
Eliminate TclPrintByteCodeObj()'s 'interp' argument, which is not used. Fix some indenting.
Diffstat (limited to 'generic/tclAssembly.c')
| -rw-r--r-- | generic/tclAssembly.c | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/generic/tclAssembly.c b/generic/tclAssembly.c index 7bec144..cda5072 100644 --- a/generic/tclAssembly.c +++ b/generic/tclAssembly.c @@ -922,12 +922,7 @@ CompileAssembleObj( * Report on what the assembler did. */ -#ifdef TCL_COMPILE_DEBUG - if (tclTraceCompile >= 2) { - TclPrintByteCodeObj(interp, objPtr); - fflush(stdout); - } -#endif /* TCL_COMPILE_DEBUG */ + TclDebugPrintByteCodeObj(objPtr); return codePtr; } |