summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2017-04-12 13:15:39 (GMT)
committerdgp <dgp@users.sourceforge.net>2017-04-12 13:15:39 (GMT)
commit59f0c070d62204e43e5d39d6810a444218ebebb1 (patch)
treec5a9e0ad2576f39258b4e7e9b5409ca6052b1bb0 /tests
parent50a2019b617635acbfc1c91b00f41d57f61e1fa1 (diff)
parentbc97ae8a02bb8363f85b25501b9aa125c5b344cd (diff)
downloadtcl-59f0c070d62204e43e5d39d6810a444218ebebb1.zip
tcl-59f0c070d62204e43e5d39d6810a444218ebebb1.tar.gz
tcl-59f0c070d62204e43e5d39d6810a444218ebebb1.tar.bz2
Revert recent commit. TIP 237 is clear that %llu is invalid.
Diffstat (limited to 'tests')
-rw-r--r--tests/format.test6
-rw-r--r--tests/scan.test13
2 files changed, 0 insertions, 19 deletions
diff --git a/tests/format.test b/tests/format.test
index a4ea25e..00b6939 100644
--- a/tests/format.test
+++ b/tests/format.test
@@ -549,12 +549,6 @@ test format-17.3 {testing %ld with non-wide} {wideIs64bit} {
test format-17.4 {testing %l with non-integer} {
format %lf 1
} 1.000000
-test format-17.5 {testing %llu with bignum} {
- format %llu 0xabcdef0123456789abcdef
-} 207698809136909011942886895
-test format-17.6 {testing %llu with negative number} -body {
- format %llu -1
-} -returnCodes 1 -result {unsigned bignum format is invalid}
test format-18.1 {do not demote existing numeric values} {
set a 0xaaaaaaaa
diff --git a/tests/scan.test b/tests/scan.test
index 8ddb595..7540c9c 100644
--- a/tests/scan.test
+++ b/tests/scan.test
@@ -541,19 +541,6 @@ test scan-5.15 {Bug be003d570f} {
test scan-5.16 {Bug be003d570f} {
scan 0x40 %b
} 0
-test scan-5.17 {bigint scanning} -setup {
- set a {}; set b {}; set c {}; set d {}
-} -body {
- list [scan "207698809136909011942886895,207698809136909011942886895,abcdef0123456789abcdef,125715736004432126361152746757" \
- %llu,%lld,%llx,%llo a b c d] $a $b $c $d
-} -result {4 207698809136909011942886895 207698809136909011942886895 207698809136909011942886895 207698809136909011942886895}
-test scan-5.18 {bigint scanning underflow} -setup {
- set a {};
-} -body {
- list [scan "-207698809136909011942886895" \
- %llu a] $a
-} -returnCodes 1 -result {unsigned bignum scans are invalid}
-
test scan-6.1 {floating-point scanning} -setup {
set a {}; set b {}; set c {}; set d {}