diff options
| author | sebres <sebres@users.sourceforge.net> | 2019-01-08 13:29:29 (GMT) |
|---|---|---|
| committer | sebres <sebres@users.sourceforge.net> | 2019-01-08 13:29:29 (GMT) |
| commit | 1d20d5be0d4e895553cfa9df6ea4769a4ed309c9 (patch) | |
| tree | 9a92ffbdbfd059394ee23adcbd69eead4b285543 /tests/basic.test | |
| parent | 8692d794c4849ab10814860347fd980de3e4cbcd (diff) | |
| download | tcl-1d20d5be0d4e895553cfa9df6ea4769a4ed309c9.zip tcl-1d20d5be0d4e895553cfa9df6ea4769a4ed309c9.tar.gz tcl-1d20d5be0d4e895553cfa9df6ea4769a4ed309c9.tar.bz2 | |
bug [cc1e91552c]: added test cases showing the regression (expansion & lrange)
Diffstat (limited to 'tests/basic.test')
| -rw-r--r-- | tests/basic.test | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/basic.test b/tests/basic.test index 865814a..137ad53 100644 --- a/tests/basic.test +++ b/tests/basic.test @@ -962,6 +962,10 @@ test basic-48.23.$noComp {expansion: handle return codes} -constraints $constrai unset res t } -result {0 10 1 Hejsan} +test basic-48.24.$noComp {expansion: empty not canonical list, regression test, bug [cc1e91552c]} $constraints { + run {list [list {*}{ }] [list {*}[format %c 32]] [list {*}[set a { }]]} +} [lrepeat 3 {}] + } ;# End of noComp loop test basic-49.1 {Tcl_EvalEx: verify TCL_EVAL_GLOBAL operation} testevalex { |