From c7de8a1d22c60626b19b0bb57ac58fa7d9d5cc16 Mon Sep 17 00:00:00 2001 From: "jan.nijtmans" Date: Wed, 8 Apr 2020 07:57:03 +0000 Subject: In TCL_UTF_MAX=4 mode, string lengths are quitely different. --- tests/string.test | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tests/string.test b/tests/string.test index d358fce..aca3570 100644 --- a/tests/string.test +++ b/tests/string.test @@ -1859,7 +1859,7 @@ test string-21.14.$noComp {string wordend, unicode} -body { test string-21.15.$noComp {string wordend, unicode} -body { run {string wordend "\U1D7CA\U1D7CA abc" 0} } -result 2 -test string-21.16.$noComp {string wordend, unicode} -body { +test string-21.16.$noComp {string wordend, unicode} -constraints tip389 -body { run {string wordend "\U1D7CA\U1D7CA abc" 10} } -result 8 @@ -1905,7 +1905,7 @@ test string-22.13.$noComp {string wordstart, unicode} -body { test string-22.14.$noComp {string wordstart, unicode} -body { run {string wordstart "\U1D7CA\U1D7CA abc" 0} } -result 0 -test string-22.15.$noComp {string wordstart, unicode} -body { +test string-22.15.$noComp {string wordstart, unicode} -constraints tip389 -body { run {string wordstart "\U1D7CA\U1D7CA abc" 10} } -result 5 -- cgit v0.12