diff options
author | dgp <dgp@users.sourceforge.net> | 2016-10-20 17:54:47 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2016-10-20 17:54:47 (GMT) |
commit | d7ad9bc43170b443a5c667ad0338873cebda5ced (patch) | |
tree | 3336429c96e95d49f535386b99a64a05701fa7d9 /tests | |
parent | d3c6e22da28dddf8b1f028900647c9221ffcd64a (diff) | |
download | tcl-d7ad9bc43170b443a5c667ad0338873cebda5ced.zip tcl-d7ad9bc43170b443a5c667ad0338873cebda5ced.tar.gz tcl-d7ad9bc43170b443a5c667ad0338873cebda5ced.tar.bz2 |
EVIL HACKs are bad. Unnecessary ones are intolerable. Bad tests cause trouble.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/format.test | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/tests/format.test b/tests/format.test index 27eac31..e199398 100644 --- a/tests/format.test +++ b/tests/format.test @@ -564,9 +564,12 @@ test format-19.3 {Bug 2830354} { test format-20.1 {Bug 2932421: plain %s caused intrep change of args} -body { set x [dict create a b c d] format %s $x - # After this, obj in $x should be a dict with a non-NULL bytes field + # After this, obj in $x should be a dict + # We are testing to make sure it has not been shimmered to a + # different intrep when that is not necessary. + # Whether or not there is a string rep - we should not care! tcl::unsupported::representation $x -} -match glob -result {value is a dict with *, string representation "*"} +} -match glob -result {value is a dict *} # cleanup catch {unset a} |