summaryrefslogtreecommitdiffstats
path: root/tests/string.test
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2018-07-26 15:51:28 (GMT)
committerdgp <dgp@users.sourceforge.net>2018-07-26 15:51:28 (GMT)
commit164a7f04c03e56a310d9386fd8ddbd6319c0c788 (patch)
treefdf6e737571e4e50ac1f240c618987e8aa617955 /tests/string.test
parent814c867db47078736aae2dbe18cbc4191fe90aee (diff)
downloadtcl-164a7f04c03e56a310d9386fd8ddbd6319c0c788.zip
tcl-164a7f04c03e56a310d9386fd8ddbd6319c0c788.tar.gz
tcl-164a7f04c03e56a310d9386fd8ddbd6319c0c788.tar.bz2
New test for [Bug ba921a8d98].
Diffstat (limited to 'tests/string.test')
-rw-r--r--tests/string.test3
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/string.test b/tests/string.test
index 868fc25..3f5fd81 100644
--- a/tests/string.test
+++ b/tests/string.test
@@ -2015,6 +2015,9 @@ test string-29.4 {string cat, many args} {
list $r1 $r2
} {0 0}
+test string-30.1 {[Bug ba921a8d98]} {
+ string cat [set data [binary format a* hello]] [encoding convertto $data] [unset data]
+} hellohello
# cleanup