From 2133e40e589348c5df1b721c1d0e0ac2f2385505 Mon Sep 17 00:00:00 2001
From: sebres <sebres@users.sourceforge.net>
Date: Thu, 26 Jul 2018 18:07:34 +0000
Subject: amend to [d498578df4], still one test for [Bug ba921a8d98] with
 inplace by subst inside string (compiled as "strcat" instruction)

---
 tests/string.test | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/tests/string.test b/tests/string.test
index 3f5fd81..8fc5b0e 100644
--- a/tests/string.test
+++ b/tests/string.test
@@ -2015,9 +2015,12 @@ test string-29.4 {string cat, many args} {
     list $r1 $r2
 } {0 0}
 
-test string-30.1 {[Bug ba921a8d98]} {
+test string-30.1.1 {[Bug ba921a8d98]: string cat} {
     string cat [set data [binary format a* hello]] [encoding convertto $data] [unset data]
 } hellohello
+test string-30.1.2 {[Bug ba921a8d98]: inplace cat by subst (compiled to "strcat" instruction)} {
+    set x "[set data [binary format a* hello]][encoding convertto $data][unset data]"
+} hellohello
 
 
 # cleanup
-- 
cgit v0.12