summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authormig <mig>2013-12-10 12:05:06 (GMT)
committermig <mig>2013-12-10 12:05:06 (GMT)
commit05c6524f4576db17abf945a46f2a34d85d34a683 (patch)
tree8f25094076c3c2e22f9030655bbbc719f02213b7
parent5b08f1d1ef025223ce9bc15d06dbdb88c247822a (diff)
downloadtcl-05c6524f4576db17abf945a46f2a34d85d34a683.zip
tcl-05c6524f4576db17abf945a46f2a34d85d34a683.tar.gz
tcl-05c6524f4576db17abf945a46f2a34d85d34a683.tar.bz2
fix stack computations for lmap
-rw-r--r--generic/tclCompile.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c
index c7b7875..6c2e2b6 100644
--- a/generic/tclCompile.c
+++ b/generic/tclCompile.c
@@ -554,7 +554,7 @@ InstructionDesc const tclInstructionTable[] = {
{"foreach_step", 1, 0, 0, {OPERAND_NONE}},
/* "Step" or begin next iteration of foreach loop. */
{"foreach_end", 1, 0, 0, {OPERAND_NONE}},
- {"lmap_collect", 1, 0, 0, {OPERAND_NONE}},
+ {"lmap_collect", 1, -1, 0, {OPERAND_NONE}},
{NULL, 0, 0, 0, {OPERAND_NONE}}
};