summaryrefslogtreecommitdiffstats
path: root/tests/format.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2017-06-14 07:54:51 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2017-06-14 07:54:51 (GMT)
commitb7a1ba3ba40ba71b65cefedc057bbccf0323f4a5 (patch)
treefd3f725641f7ff06608e6e77394d4bcefb5ef3ec /tests/format.test
parentf019737860823b97cfde68d64a5175fa21c3a967 (diff)
parent78e17f7f0cce0233cc1009b3f7c3aa2ea32763d7 (diff)
downloadtcl-b7a1ba3ba40ba71b65cefedc057bbccf0323f4a5.zip
tcl-b7a1ba3ba40ba71b65cefedc057bbccf0323f4a5.tar.gz
tcl-b7a1ba3ba40ba71b65cefedc057bbccf0323f4a5.tar.bz2
Rebase to core-8-6-branch (who told that fossil doesn't know how to rebase ....)
Diffstat (limited to 'tests/format.test')
-rw-r--r--tests/format.test19
1 files changed, 19 insertions, 0 deletions
diff --git a/tests/format.test b/tests/format.test
index 9afedd9..8842315 100644
--- a/tests/format.test
+++ b/tests/format.test
@@ -78,6 +78,25 @@ test format-1.11.1 {integer formatting} longIs64bit {
test format-1.12 {integer formatting} {
format "%b %#b %#b %llb" 5 0 5 [expr {2**100}]
} {101 0b0 0b101 10000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000}
+test format-1.13 {integer formatting} longIs32bit {
+ format "%#d %#d %#d %#d %#d" 0 6 34 16923 -12 -1
+} {0d0 0d6 0d34 0d16923 -0d12}
+test format-1.13.1 {integer formatting} longIs64bit {
+ format "%#d %#d %#d %#d %#d" 0 6 34 16923 -12 -1
+} {0d0 0d6 0d34 0d16923 -0d12}
+test format-1.14 {integer formatting} longIs32bit {
+ format "%#5d %#20d %#20d %#20d %#20d" 0 6 34 16923 -12 -1
+} { 0d0 0d6 0d34 0d16923 -0d12}
+test format-1.14.1 {integer formatting} longIs64bit {
+ format "%#5d %#20d %#20d %#20d %#20d" 0 6 34 16923 -12 -1
+} { 0d0 0d6 0d34 0d16923 -0d12}
+test format-1.15 {integer formatting} longIs32bit {
+ format "%-#5d %-#20d %-#20d %-#20d %-#20d" 0 6 34 16923 -12 -1
+} {0d0 0d6 0d34 0d16923 -0d12 }
+test format-1.15.1 {integer formatting} longIs64bit {
+ format "%-#5d %-#20d %-#20d %-#20d %-#20d" 0 6 34 16923 -12 -1
+} {0d0 0d6 0d34 0d16923 -0d12 }
+
test format-2.1 {string formatting} {
format "%s %s %c %s" abcd {This is a very long test string.} 120 x