diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-09-12 20:41:29 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-09-12 20:41:29 (GMT) |
| commit | 393743bb7088f57b28cd5f98d2c9f70189807a2e (patch) | |
| tree | aaedea2d95e3a091ee27030aa564047769784c1c /tests/encoding.test | |
| parent | c2626689e16b104637564825cd61b1b0ff14dfc2 (diff) | |
| download | tcl-393743bb7088f57b28cd5f98d2c9f70189807a2e.zip tcl-393743bb7088f57b28cd5f98d2c9f70189807a2e.tar.gz tcl-393743bb7088f57b28cd5f98d2c9f70189807a2e.tar.bz2 | |
Start TIP #346 implementation: For now only \xC0\x80
Diffstat (limited to 'tests/encoding.test')
| -rw-r--r-- | tests/encoding.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/encoding.test b/tests/encoding.test index 6f11968..c8f409e 100644 --- a/tests/encoding.test +++ b/tests/encoding.test @@ -669,10 +669,10 @@ test encoding-24.21 {Parse with -nocomplain but without providing encoding} { } 1 test encoding-24.22 {Syntax error, two encodings} -body { encoding convertfrom iso8859-1 utf-8 "ZX\uD800" -} -returnCodes 1 -result {wrong # args: should be "::tcl::encoding::convertfrom ?-nocomplain? ?-failindex var? ?encoding? data"} +} -returnCodes 1 -result {wrong # args: should be "::tcl::encoding::convertfrom ?-nocomplain? ?-strict? ?-failindex var? ?encoding? data"} test encoding-24.23 {Syntax error, two encodings} -body { encoding convertto iso8859-1 utf-8 "ZX\uD800" -} -returnCodes 1 -result {wrong # args: should be "::tcl::encoding::convertto ?-nocomplain? ?-failindex var? ?encoding? data"} +} -returnCodes 1 -result {wrong # args: should be "::tcl::encoding::convertto ?-nocomplain? ?-strict? ?-failindex var? ?encoding? data"} file delete [file join [temporaryDirectory] iso2022.txt] |