diff options
| author | dgp <dgp@users.sourceforge.net> | 2024-09-23 16:38:30 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2024-09-23 16:38:30 (GMT) |
| commit | cd91553ab5cce8811e9e68bf920f14063a85c7d3 (patch) | |
| tree | d3c0da39fbd9e23d2cb9ef29166124ea1f4a6aad /tests | |
| parent | 6db25dbb4a9efbd48d795450836aeeb3ccfd6580 (diff) | |
| parent | 74097337fcadf1c614db88a4ef9952825d68e86b (diff) | |
| download | tcl-cd91553ab5cce8811e9e68bf920f14063a85c7d3.zip tcl-cd91553ab5cce8811e9e68bf920f14063a85c7d3.tar.gz tcl-cd91553ab5cce8811e9e68bf920f14063a85c7d3.tar.bz2 | |
Merge trunk; Remove "Known Bugs" that are now fixed; changes file wordsmithing
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/list.test | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/list.test b/tests/list.test index 905a3d3..a4689ae 100644 --- a/tests/list.test +++ b/tests/list.test @@ -64,6 +64,16 @@ test list-1.30 {basic null treatment} { set e "\x00abc xyz" string equal $l $e } 1 +test list-1.31 {bug [e38dce74e2]} { + set l #foo + set e {} + list {*}$l {*}$e +} {{#foo}} +test list-1.32 {bug [e38dce74e2]} { + set l " #foo" + set e {} + list {*}$l {*}$e +} {{#foo}} # For the next round of tests create a list and then pick it apart # with "index" to make sure that we get back exactly what went in. |