From 8c072488a00f4e5095531ff7a09fcadc20ec97bb Mon Sep 17 00:00:00 2001 From: dgp Date: Thu, 30 Apr 2020 18:53:50 +0000 Subject: Revise constraints to where expectations are met. --- tests/utf.test | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/tests/utf.test b/tests/utf.test index 7f83eb7..2a468f9 100644 --- a/tests/utf.test +++ b/tests/utf.test @@ -1324,7 +1324,7 @@ test utf-19.1 {TclUniCharLen} -body { unset -nocomplain foo } -result {1 4} -test utf-20.1 {TclUniCharNcmp} {fullutf} { +test utf-20.1 {TclUniCharNcmp} {ucs4} { string compare [string range [format %c 0xFFFF] 0 0] [string range [format %c 0x10000] 0 0] } -1 @@ -1445,8 +1445,10 @@ UniCharCaseCmpTest < a b UniCharCaseCmpTest > b a UniCharCaseCmpTest > B a UniCharCaseCmpTest > aBcB abca -UniCharCaseCmpTest < \uFFFF [format %c 0x10000] fullutf -UniCharCaseCmpTest < \uFFFF \U10000 {Uesc fullutf} +UniCharCaseCmpTest < \uFFFF [format %c 0x10000] ucs4 +UniCharCaseCmpTest < \uFFFF \U10000 {Uesc ucs4} +UniCharCaseCmpTest > [format %c 0x10000] \uFFFF ucs4 +UniCharCaseCmpTest > \U10000 \uFFFF {Uesc ucs4} -- cgit v0.12