diff options
| -rw-r--r-- | tests/utf.test | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/utf.test b/tests/utf.test index 12841fc..a910c36 100644 --- a/tests/utf.test +++ b/tests/utf.test @@ -496,6 +496,12 @@ test utf-6.92 {Tcl_UtfNext, pointing to 2th byte of 4-byte valid sequence} testu test utf-6.93 {Tcl_UtfNext, pointing to 2th byte of 4-byte invalid sequence} testutfnext { testutfnext -bytestring \x80\x80\x80 } 3 +test utf-6.94 {Tcl_UtfNext, pointing to 2th byte of 5-byte invalid sequence} testutfnext { + testutfnext -bytestring \xA0\xA0\xA0\xA0 +} 3 +test utf-6.95 {Tcl_UtfNext, pointing to 2th byte of 5-byte invalid sequence} testutfnext { + testutfnext -bytestring \x80\x80\x80\x80 +} 3 test utf-7.1 {Tcl_UtfPrev} testutfprev { testutfprev {} |