summaryrefslogtreecommitdiffstats
path: root/tests/format.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-07-30 07:47:52 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-07-30 07:47:52 (GMT)
commit809842a942400fa2f099485c2faa3e85d946360d (patch)
treebe55463759384fa2c23bf39db82ee742bd939299 /tests/format.test
parent6f541de9a3a5684df538e29e14259aecc2addeeb (diff)
parent50912fc63c46a741cbb7fd51f25beae99817eb41 (diff)
downloadtcl-809842a942400fa2f099485c2faa3e85d946360d.zip
tcl-809842a942400fa2f099485c2faa3e85d946360d.tar.gz
tcl-809842a942400fa2f099485c2faa3e85d946360d.tar.bz2
Merge 8.5
Diffstat (limited to 'tests/format.test')
-rw-r--r--tests/format.test5
1 files changed, 3 insertions, 2 deletions
diff --git a/tests/format.test b/tests/format.test
index 88013cf..c26bbe9 100644
--- a/tests/format.test
+++ b/tests/format.test
@@ -21,6 +21,7 @@ testConstraint longIs64bit [expr {int(0x8000000000000000) < 0}]
testConstraint wideIs64bit \
[expr {(wide(0x80000000) > 0) && (wide(0x8000000000000000) < 0)}]
testConstraint wideBiggerThanInt [expr {wide(0x80000000) != int(0x80000000)}]
+testConstraint knownMsvcBug [expr {![info exists ::env(TRAVIS_OS_NAME)] || ![string match windows $::env(TRAVIS_OS_NAME)]}]
test format-1.1 {integer formatting} {
format "%*d %d %d %d" 6 34 16923 -12 -1
@@ -273,13 +274,13 @@ test format-6.1 {floating-point zeroes} {eformat} {
test format-6.2 {floating-point zeroes} {eformat} {
format "%.4e %.4f %.4g" 0.0 0.0 0.0 0.0
} {0.0000e+00 0.0000 0}
-test format-6.3 {floating-point zeroes} {eformat} {
+test format-6.3 {floating-point zeroes} {eformat knownMsvcBug} {
format "%#.4e %#.4f %#.4g" 0.0 0.0 0.0 0.0
} {0.0000e+00 0.0000 0.000}
test format-6.4 {floating-point zeroes} {eformat} {
format "%.0e %.0f %.0g" 0.0 0.0 0.0 0.0
} {0e+00 0 0}
-test format-6.5 {floating-point zeroes} {eformat} {
+test format-6.5 {floating-point zeroes} {eformat knownMsvcBug} {
format "%#.0e %#.0f %#.0g" 0.0 0.0 0.0 0.0
} {0.e+00 0. 0.}
test format-6.6 {floating-point zeroes} {