summaryrefslogtreecommitdiffstats
path: root/contrib/tcl/tests/format.test
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/tcl/tests/format.test')
-rw-r--r--contrib/tcl/tests/format.test10
1 files changed, 2 insertions, 8 deletions
diff --git a/contrib/tcl/tests/format.test b/contrib/tcl/tests/format.test
index 3fe4eb5..e6764f3 100644
--- a/contrib/tcl/tests/format.test
+++ b/contrib/tcl/tests/format.test
@@ -10,7 +10,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# SCCS: @(#) format.test 1.22 96/02/16 08:55:56
+# SCCS: @(#) format.test 1.23 96/07/31 16:54:50
if {[string compare test [info procs test]] == 1} then {source defs}
@@ -355,12 +355,6 @@ test format-10.12 {XPG3 %$n specifiers} {
list [catch {format {%2$*d} 4 5 6} msg] $msg
} {0 { 6}}
-test format-11.1 {enormous width specifiers} {
- format "%077777777d" 77777777
-} {0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000077777777}
-test format-11.2 {enormous width specifiers} {
- format "%*d" 123456789 77777777
-} { 77777777}
-test format-11.3 {negative width specifiers} {
+test format-11.1 {negative width specifiers} {
format "%*d" -47 25
} {25}
OpenPOWER on IntegriCloud