diff options
| author | sebres <sebres@users.sourceforge.net> | 2019-01-09 10:10:12 (GMT) |
|---|---|---|
| committer | sebres <sebres@users.sourceforge.net> | 2019-01-09 10:10:12 (GMT) |
| commit | 6504b376c3d1878dd2acb60c9ac6065a51305fed (patch) | |
| tree | d7197c615f884da1b4579005a6967a6a7b0f7601 /tests/basic.test | |
| parent | 3b1d9efc79aa9331ecd4ce3f13fcdaeeb93f119b (diff) | |
| parent | 4693981b235565c28349466192503fb764e5e55e (diff) | |
| download | tcl-6504b376c3d1878dd2acb60c9ac6065a51305fed.zip tcl-6504b376c3d1878dd2acb60c9ac6065a51305fed.tar.gz tcl-6504b376c3d1878dd2acb60c9ac6065a51305fed.tar.bz2 | |
merge 8.6 (regression bug-[cc1e91552c], etc)
Diffstat (limited to 'tests/basic.test')
| -rw-r--r-- | tests/basic.test | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/basic.test b/tests/basic.test index 2332994..1890042 100644 --- a/tests/basic.test +++ b/tests/basic.test @@ -958,6 +958,12 @@ 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 $constraints -setup { + unset -nocomplain a +} -body { + run {list [list {*}{ }] [list {*}[format %c 32]] [list {*}[set a { }]]} +} -result [lrepeat 3 {}] -cleanup {unset -nocomplain a} + } ;# End of noComp loop test basic-49.1 {Tcl_EvalEx: verify TCL_EVAL_GLOBAL operation} testevalex { |