diff options
author | dgp <dgp@users.sourceforge.net> | 2018-10-24 02:00:15 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2018-10-24 02:00:15 (GMT) |
commit | f338047c195aac7e3ac7bb3485da02b33fd868a2 (patch) | |
tree | 159ec7baa48a4fae2ac0fceb40eb4306dea28539 /generic/tclDisassemble.c | |
parent | 90221ac971708ce2bd09ffff98b55b8198513808 (diff) | |
parent | 335774aef1d1e39ff22a1024aaa062106f99390b (diff) | |
download | tcl-f338047c195aac7e3ac7bb3485da02b33fd868a2.zip tcl-f338047c195aac7e3ac7bb3485da02b33fd868a2.tar.gz tcl-f338047c195aac7e3ac7bb3485da02b33fd868a2.tar.bz2 |
merge 8.7
Diffstat (limited to 'generic/tclDisassemble.c')
-rw-r--r-- | generic/tclDisassemble.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclDisassemble.c b/generic/tclDisassemble.c index 46012c5..6ea3397 100644 --- a/generic/tclDisassemble.c +++ b/generic/tclDisassemble.c @@ -1622,7 +1622,7 @@ Tcl_DisassembleObjCmd( "BYTECODE", NULL); return TCL_ERROR; } - if (PTR2INT(clientData)) { + if (clientData) { Tcl_SetObjResult(interp, DisassembleByteCodeAsDicts(interp, codeObjPtr)); } else { |