summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2013-03-19 10:06:01 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2013-03-19 10:06:01 (GMT)
commit0271027790063e391fe23ca6c20fb4d900e7ef6d (patch)
tree49abd29a1a84aab026b4753c9e7d0de8402fca72
parent5c5c9a3e8402e5c96f8bb5d8384f712a22cb59ae (diff)
downloadtcl-0271027790063e391fe23ca6c20fb4d900e7ef6d.zip
tcl-0271027790063e391fe23ca6c20fb4d900e7ef6d.tar.gz
tcl-0271027790063e391fe23ca6c20fb4d900e7ef6d.tar.bz2
[Bug 3606387]: Fix isolation of test scan-7.4.
-rw-r--r--tests/scan.test2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/scan.test b/tests/scan.test
index 34351e0..d7b72d5 100644
--- a/tests/scan.test
+++ b/tests/scan.test
@@ -481,7 +481,7 @@ test scan-7.3 {string and character scanning} {
list [scan "123456 test " "%*c%*s %s %s %s" a b c] $a $b $c
} {1 test {} {}}
test scan-7.4 {string and character scanning} {
- set a {}; set b {}; set c {}; set d
+ set a {}; set b {}; set c {}; set d {}
list [scan "ababcd01234 f 123450" {%4[abcd] %4[abcd] %[^abcdef] %[^0]} a b c d] $a $b $c $d
} {4 abab cd {01234 } {f 12345}}
test scan-7.5 {string and character scanning} {