diff options
| author | jan.nijtmans <jan.nijtmans@noemail.net> | 2011-05-06 07:55:07 (GMT) |
|---|---|---|
| committer | jan.nijtmans <jan.nijtmans@noemail.net> | 2011-05-06 07:55:07 (GMT) |
| commit | 53ddbb115c58d011db08662f3f13fc0520a587a2 (patch) | |
| tree | 319326c5483d5926709f10281df2cbdeb101549a /tests | |
| parent | 1e459def95905fd89043d02c10290faa98fb3c0b (diff) | |
| parent | 5ea78317d19a38f36002298857291a3602ee7337 (diff) | |
| download | tcl-53ddbb115c58d011db08662f3f13fc0520a587a2.zip tcl-53ddbb115c58d011db08662f3f13fc0520a587a2.tar.gz tcl-53ddbb115c58d011db08662f3f13fc0520a587a2.tar.bz2 | |
comment fix
FossilOrigin-Name: fa4eb25ecf2d4a292efdad8c8a0a058078336a76
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/string.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/string.test b/tests/string.test index a3bac61..1a62a66 100644 --- a/tests/string.test +++ b/tests/string.test @@ -602,18 +602,18 @@ test string-6.91 {string is double, bad doubles} { } set result } {1 1 0 0 0 1 0 0} -test string-6.92 {string is double, 32-bit overflow} { +test string-6.92 {string is integer, 32-bit overflow} { # Bug 718878 set x 0x100000000 list [string is integer -failindex var $x] $var } {0 -1} -test string-6.93 {string is double, 32-bit overflow} { +test string-6.93 {string is integer, 32-bit overflow} { # Bug 718878 set x 0x100000000 append x "" list [string is integer -failindex var $x] $var } {0 -1} -test string-6.94 {string is double, 32-bit overflow} { +test string-6.94 {string is integer, 32-bit overflow} { # Bug 718878 set x 0x100000000 list [string is integer -failindex var [expr {$x}]] $var |