From 164a7f04c03e56a310d9386fd8ddbd6319c0c788 Mon Sep 17 00:00:00 2001
From: dgp <dgp@users.sourceforge.net>
Date: Thu, 26 Jul 2018 15:51:28 +0000
Subject: New test for [Bug ba921a8d98].

---
 tests/string.test | 3 +++
 1 file changed, 3 insertions(+)

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
-- 
cgit v0.12