summaryrefslogtreecommitdiffstats
path: root/tests/string.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2011-05-06 07:54:24 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2011-05-06 07:54:24 (GMT)
commit05254ef80b53bb81151e5bedb75e686b63dc477a (patch)
tree35f8ec1714c48c56ce188d82a282cebf14dd44f8 /tests/string.test
parent1fd1d39eedb4da8fa200dfa4e16c7e4da62ed81d (diff)
parentf876bd8d241503fbea9bde27bd062e48da781d10 (diff)
downloadtcl-05254ef80b53bb81151e5bedb75e686b63dc477a.zip
tcl-05254ef80b53bb81151e5bedb75e686b63dc477a.tar.gz
tcl-05254ef80b53bb81151e5bedb75e686b63dc477a.tar.bz2
comment fix
Diffstat (limited to 'tests/string.test')
-rw-r--r--tests/string.test6
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/string.test b/tests/string.test
index cddfe4c..c3cfc3c 100644
--- a/tests/string.test
+++ b/tests/string.test
@@ -601,18 +601,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