[8e6a9ac221] Stop false matching with bytearrays. (string-11.55)

1 files changed, 3 insertions, 0 deletions

diff --git a/tests/string.test b/tests/string.test
index 7a7a749..39abd86 100644
--- a/tests/string.test
+++ b/tests/string.test
@@ -1111,6 +1111,9 @@ test string-11.54 {string match, failure} {
 	    [string match *a*l*\u0000*cba* $longString] \
 	    [string match *===* $longString]
 } {0 1 1 1 0 0}
+test string-11.55 {string match, invalid binary optimization} {
+    [format string] match \u0141 [binary format c 65]
+} 0
 
 test string-12.1 {string range} {
     list [catch {string range} msg] $msg