diff options
| author | dgp <dgp@users.sourceforge.net> | 2020-05-07 18:36:25 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2020-05-07 18:36:25 (GMT) |
| commit | 6d36267ee03ebbf37b1843d0602220bbc299f8e9 (patch) | |
| tree | e74b8a8de1d5417dd98541a99d190782f2a615ba | |
| parent | 8fc378853391cde228bf25c1491e9ba02ebf0f2c (diff) | |
| download | tcl-6d36267ee03ebbf37b1843d0602220bbc299f8e9.zip tcl-6d36267ee03ebbf37b1843d0602220bbc299f8e9.tar.gz tcl-6d36267ee03ebbf37b1843d0602220bbc299f8e9.tar.bz2 | |
split and constrain the failing test.
| -rw-r--r-- | tests/encoding.test | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/tests/encoding.test b/tests/encoding.test index 552c97f..84f9ae1 100644 --- a/tests/encoding.test +++ b/tests/encoding.test @@ -335,7 +335,12 @@ test encoding-15.4 {UtfToUtfProc emoji character input} -body { set y [encoding convertfrom utf-8 \xED\xA0\xBD\xED\xB8\x82] list [string length $x] $y } -result "6 \uD83D\uDE02" -test encoding-15.5 {UtfToUtfProc emoji character input} { +test encoding-15.5.0 {UtfToUtfProc emoji character input} ucs2 { + set x \xF0\x9F\x98\x82 + set y [encoding convertfrom utf-8 \xF0\x9F\x98\x82] + list [string length $x] $y +} "4 \xF0\x9F\x98\x82" +test encoding-15.5.1 {UtfToUtfProc emoji character input} fullutf { set x \xF0\x9F\x98\x82 set y [encoding convertfrom utf-8 \xF0\x9F\x98\x82] list [string length $x] $y |
