diff options
author | dgp <dgp@users.sourceforge.net> | 2016-10-20 17:54:47 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2016-10-20 17:54:47 (GMT) |
commit | bfae5bf49268737c01fe601a9c556ca7af4f8973 (patch) | |
tree | 3336429c96e95d49f535386b99a64a05701fa7d9 /generic | |
parent | 8b894ab295af35f4793ab68580a0f2cb6477a638 (diff) | |
download | tcl-bfae5bf49268737c01fe601a9c556ca7af4f8973.zip tcl-bfae5bf49268737c01fe601a9c556ca7af4f8973.tar.gz tcl-bfae5bf49268737c01fe601a9c556ca7af4f8973.tar.bz2 |
EVIL HACKs are bad. Unnecessary ones are intolerable. Bad tests cause trouble.
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclCompCmds.c | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/generic/tclCompCmds.c b/generic/tclCompCmds.c index 3ab03cc..7dba232 100644 --- a/generic/tclCompCmds.c +++ b/generic/tclCompCmds.c @@ -3206,17 +3206,6 @@ TclCompileFormatCmd( */ TclEmitInstInt1(INST_STR_CONCAT1, i, envPtr); - } else { - /* - * EVIL HACK! Force there to be a string representation in the case - * where there's just a "%s" in the format; case covered by the test - * format-20.1 (and it is horrible...) - */ - - TclEmitOpcode(INST_DUP, envPtr); - PushStringLiteral(envPtr, ""); - TclEmitOpcode(INST_STR_EQ, envPtr); - TclEmitOpcode(INST_POP, envPtr); } return TCL_OK; } |