diff options
| author | dgp <dgp@users.sourceforge.net> | 2017-12-06 20:03:07 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2017-12-06 20:03:07 (GMT) |
| commit | a7bb7b19d6d8183b5116bea5bd25a75503275b3a (patch) | |
| tree | 9bef4b5d5e165d292492231d1fc7933b990f33f2 /tests | |
| parent | 1e64c9f8b20d2e1b46fd665631a0b466c7b0413d (diff) | |
| parent | 4644a04ee326528bd852267197c074756f50507d (diff) | |
| download | tcl-a7bb7b19d6d8183b5116bea5bd25a75503275b3a.zip tcl-a7bb7b19d6d8183b5116bea5bd25a75503275b3a.tar.gz tcl-a7bb7b19d6d8183b5116bea5bd25a75503275b3a.tar.bz2 | |
merge 8.7
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/scan.test | 2 | ||||
| -rw-r--r-- | tests/utf.test | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/tests/scan.test b/tests/scan.test index b36b412..98c581b 100644 --- a/tests/scan.test +++ b/tests/scan.test @@ -553,7 +553,7 @@ test scan-5.18 {bigint scanning underflow} -setup { list [scan "-207698809136909011942886895" \ %llu a] $a } -returnCodes 1 -result {unsigned bignum scans are invalid} -test scan-5.18 {bigint scanning invalid} -setup { +test scan-5.19 {bigint scanning invalid} -setup { set a {}; } -body { list [scan "207698809136909011942886895" \ diff --git a/tests/utf.test b/tests/utf.test index d0fa7be..95775a8 100644 --- a/tests/utf.test +++ b/tests/utf.test @@ -124,7 +124,7 @@ test utf-4.10 {Tcl_NumUtfChars: #u0000, calc len, overcomplete} {testnumutfchars test utf-5.1 {Tcl_UtfFindFirst} {testfindfirst testbytestring} { testfindfirst [testbytestring "abcbc"] 98 } {bcbc} -test utf-5.1 {Tcl_UtfFindLast} {testfindlast testbytestring} { +test utf-5.2 {Tcl_UtfFindLast} {testfindlast testbytestring} { testfindlast [testbytestring "abcbc"] 98 } {bc} |