summaryrefslogtreecommitdiffstats
path: root/generic/tclCompCmdsGR.c
diff options
context:
space:
mode:
authoroehhar <harald.oehlmann@elmicron.de>2014-12-17 07:53:41 (GMT)
committeroehhar <harald.oehlmann@elmicron.de>2014-12-17 07:53:41 (GMT)
commit691e34c6ccbee85bbd91e420504983345029d5ea (patch)
tree53724883281fc684d74af9de3e4a0a1bfd56e946 /generic/tclCompCmdsGR.c
parenta9606871f5ddb7d6a8cd69f3fa0c41fe8b3c0396 (diff)
parent2933029b8c2dfc2e4a8bd89cacad8aa53099d5d4 (diff)
downloadtcl-691e34c6ccbee85bbd91e420504983345029d5ea.zip
tcl-691e34c6ccbee85bbd91e420504983345029d5ea.tar.gz
tcl-691e34c6ccbee85bbd91e420504983345029d5ea.tar.bz2
Merge trunk
Diffstat (limited to 'generic/tclCompCmdsGR.c')
-rw-r--r--generic/tclCompCmdsGR.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCompCmdsGR.c b/generic/tclCompCmdsGR.c
index 9d258fc..98407f7 100644
--- a/generic/tclCompCmdsGR.c
+++ b/generic/tclCompCmdsGR.c
@@ -871,7 +871,7 @@ TclCompileLappendCmd(
/* TODO: Consider support for compiling expanded args. */
numWords = parsePtr->numWords;
- if (numWords == 1) {
+ if (numWords < 3) {
return TCL_ERROR;
}