diff options
author | oehhar <harald.oehlmann@elmicron.de> | 2022-03-15 07:09:40 (GMT) |
---|---|---|
committer | oehhar <harald.oehlmann@elmicron.de> | 2022-03-15 07:09:40 (GMT) |
commit | 1975c98a5c09989a767f8288beec0e67abf408a3 (patch) | |
tree | b350bdc164effb5fba8bc3308095ac2e8662fc4e /tests/encoding.test | |
parent | fb7be1b475dce7bf5ba087fedbe93f83e2cb4f06 (diff) | |
download | tcl-1975c98a5c09989a767f8288beec0e67abf408a3.zip tcl-1975c98a5c09989a767f8288beec0e67abf408a3.tar.gz tcl-1975c98a5c09989a767f8288beec0e67abf408a3.tar.bz2 |
TIP607 encoding failindex: test correction
Diffstat (limited to 'tests/encoding.test')
-rw-r--r-- | tests/encoding.test | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/tests/encoding.test b/tests/encoding.test index 7a1e4e7..4284254 100644 --- a/tests/encoding.test +++ b/tests/encoding.test @@ -696,9 +696,10 @@ test encoding-24.30 {convertrom -failindex with correct data} -body { set test } -returnCodes 0 -result -1 test encoding-24.31 {convertrom -failindex with incomplete utf8} -body { - set res [encoding convertfrom -failindex test A\xc3] - lappend res $test -} -returnCodes 0 -result {A 1} + set x [encoding convertfrom -failindex i A\xc3] + binary scan $x H* y + list $y $i +} -returnCodes 0 -result {41 1} file delete [file join [temporaryDirectory] iso2022.txt] |