summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-08-25 16:09:04 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-08-25 16:09:04 (GMT)
commit7cb8eb7218804199155464c4441c47b8a2fbf677 (patch)
treec601fd5ad6a3377f47dda382bafaa04139eabafa
parent7aa8eec8976c27e9a6f3e3d39f0008e6fb1b063d (diff)
downloadtcl-7cb8eb7218804199155464c4441c47b8a2fbf677.zip
tcl-7cb8eb7218804199155464c4441c47b8a2fbf677.tar.gz
tcl-7cb8eb7218804199155464c4441c47b8a2fbf677.tar.bz2
Add test-case util-9.59, which demonstrates bug [b5777d3d32]
-rw-r--r--tests/util.test3
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/util.test b/tests/util.test
index b516a0e..03fa9fe 100644
--- a/tests/util.test
+++ b/tests/util.test
@@ -818,6 +818,9 @@ test util-9.57 {Tcl_GetIntForIndex} {
test util-9.58 {Tcl_GetIntForIndex} -body {
string index abcd end--0x8000000000000000
} -result {}
+test util-9.59 {Tcl_GetIntForIndex} {
+ string index abcd 0-0x10000000000000000
+} {}
test util-10.1 {Tcl_PrintDouble - rounding} {ieeeFloatingPoint} {
convertDouble 0x0000000000000000