summaryrefslogtreecommitdiffstats
path: root/generic/tclCompCmdsGR.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2013-09-19 18:53:01 (GMT)
committerdgp <dgp@users.sourceforge.net>2013-09-19 18:53:01 (GMT)
commit7b3702821be88e66474de1c1b1aa84c381276668 (patch)
treecfdbb08e5f959f29f643d207e6466edcebc494d0 /generic/tclCompCmdsGR.c
parent91ec52b16e7cd903ca196560e5ddb1d5ca1c60a9 (diff)
downloadtcl-7b3702821be88e66474de1c1b1aa84c381276668.zip
tcl-7b3702821be88e66474de1c1b1aa84c381276668.tar.gz
tcl-7b3702821be88e66474de1c1b1aa84c381276668.tar.bz2
Line numbers wrong in compiled [unset].
Diffstat (limited to 'generic/tclCompCmdsGR.c')
-rw-r--r--generic/tclCompCmdsGR.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclCompCmdsGR.c b/generic/tclCompCmdsGR.c
index 4e4a3af..43ea3d3 100644
--- a/generic/tclCompCmdsGR.c
+++ b/generic/tclCompCmdsGR.c
@@ -587,6 +587,7 @@ TclCompileInfoCommandsCmd(
* that the result needs to be list-ified.
*/
+ /* TODO: Just push the known value */
CompileWord(envPtr, tokenPtr, interp, 1);
TclEmitOpcode( INST_RESOLVE_COMMAND, envPtr);
TclEmitOpcode( INST_DUP, envPtr);