From 03f932c5097d9c30fceae394f42f9b73f6c48809 Mon Sep 17 00:00:00 2001 From: dgp Date: Wed, 29 Apr 2020 22:04:16 +0000 Subject: New test for Tcl_UniCharNcmp. --- tests/utf.test | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/tests/utf.test b/tests/utf.test index 86f151e..8ad169e 100644 --- a/tests/utf.test +++ b/tests/utf.test @@ -1321,8 +1321,9 @@ test utf-19.1 {TclUniCharLen} -body { unset -nocomplain foo } -result {1 4} -test utf-20.1 {TclUniCharNcmp} { -} {} +test utf-20.1 {TclUniCharNcmp} {fullutf} { + string compare [string range [format %c 0xFFFF] 0 0] [string range [format %c 0x10000] 0 0] +} -1 test utf-21.1 {TclUniCharIsAlnum} { # this returns 1 with Unicode 7 compliance -- cgit v0.12