From 749b69330051cdfa0d009c41604472427aaebcd4 Mon Sep 17 00:00:00 2001 From: Steve Bennett Date: Wed, 3 Mar 2010 15:45:57 +1000 Subject: Fix 'format %%' Signed-off-by: Steve Bennett --- tests/misc.test | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'tests/misc.test') diff --git a/tests/misc.test b/tests/misc.test index cb46591..e44106c 100644 --- a/tests/misc.test +++ b/tests/misc.test @@ -25,10 +25,15 @@ test regr-1.3 "Invalid for expression" { for {set i 0} {$i < n} {incr i} { set a(b) $i set a(c) $i + break } } } 1 +test regr-1.4 "format double percent" { + format (%d%%) 12 +} {(12%)} + section "I/O Testing" test io-1.1 "Read last line with no newline" { -- cgit v1.1