diff options
author | dgp <dgp@users.sourceforge.net> | 2020-04-09 17:43:16 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2020-04-09 17:43:16 (GMT) |
commit | 0834a2b225f7f2b09abce5ae03af5ff936f2a947 (patch) | |
tree | e32e5d0d7c456ad3afd594700c1a313fe26dfded /tests/dstring.test | |
parent | e2b3b1edf02e0c1ab06cfe784d6a7bd76e8050d8 (diff) | |
download | tcl-0834a2b225f7f2b09abce5ae03af5ff936f2a947.zip tcl-0834a2b225f7f2b09abce5ae03af5ff936f2a947.tar.gz tcl-0834a2b225f7f2b09abce5ae03af5ff936f2a947.tar.bz2 |
Revise two tests that were detecting and forgiving a bug.
Diffstat (limited to 'tests/dstring.test')
-rw-r--r-- | tests/dstring.test | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/dstring.test b/tests/dstring.test index 95321ec..5151d27 100644 --- a/tests/dstring.test +++ b/tests/dstring.test @@ -130,13 +130,13 @@ test dstring-2.12 {appending list elements} testdstring { testdstring get } {x #} test dstring-2.13 {appending list elements} testdstring { - # This test shows lack of sophistication in Tcl_DStringAppendElement's + # This test checks the sophistication in Tcl_DStringAppendElement's # decision about whether #-quoting can be disabled. testdstring free testdstring append "x " -1 testdstring element # testdstring get -} {x {#}} +} {x #} test dstring-3.1 {nested sublists} testdstring { testdstring free @@ -227,7 +227,7 @@ test dstring-3.9 {appending list elements} testdstring { testdstring get } {x {x #}} test dstring-3.10 {appending list elements} testdstring { - # This test shows lack of sophistication in Tcl_DStringAppendElement's + # This test checks the sophistication in Tcl_DStringAppendElement's # decision about whether #-quoting can be disabled. testdstring free testdstring append x -1 @@ -236,7 +236,7 @@ test dstring-3.10 {appending list elements} testdstring { testdstring element # testdstring end testdstring get -} {x {x {#}}} +} {x {x #}} test dstring-4.1 {truncation} testdstring { testdstring free |