summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2005-06-17 23:41:00 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2005-06-17 23:41:00 (GMT)
commit1eab272665547e3f9be60541313af2b3c614c747 (patch)
tree6c75fc7a238a9d2b00bfd317f1b847798a418e12 /tests
parente1e80d15370c158d3ae2870cfc5d26e1d9791046 (diff)
downloadtcl-1eab272665547e3f9be60541313af2b3c614c747.zip
tcl-1eab272665547e3f9be60541313af2b3c614c747.tar.gz
tcl-1eab272665547e3f9be60541313af2b3c614c747.tar.bz2
Fix bug in [format %hx] handling on selected platforms. [Bug 1154163]
Diffstat (limited to 'tests')
-rw-r--r--tests/format.test6
1 files changed, 5 insertions, 1 deletions
diff --git a/tests/format.test b/tests/format.test
index 653ec35..afb18b0 100644
--- a/tests/format.test
+++ b/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.
#
-# RCS: @(#) $Id: format.test,v 1.19 2004/10/27 17:56:22 kennykb Exp $
+# RCS: @(#) $Id: format.test,v 1.20 2005/06/17 23:41:03 dkf Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest 2
@@ -364,6 +364,10 @@ test format-10.2 {"h" format specifier} {nonPortable} {
test format-10.3 {"h" format specifier} {nonPortable} {
format %hd 0x10000
} 0
+test format-10.4 {"h" format specifier} {
+ # Bug 1154163: This is minimal behaviour for %hx specifier!
+ format %hx 1
+} 1
test format-11.1 {XPG3 %$n specifiers} {
format {%2$d %1$d} 4 5