diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2013-03-19 10:06:01 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2013-03-19 10:06:01 (GMT) |
| commit | 0271027790063e391fe23ca6c20fb4d900e7ef6d (patch) | |
| tree | 49abd29a1a84aab026b4753c9e7d0de8402fca72 | |
| parent | 5c5c9a3e8402e5c96f8bb5d8384f712a22cb59ae (diff) | |
| download | tcl-0271027790063e391fe23ca6c20fb4d900e7ef6d.zip tcl-0271027790063e391fe23ca6c20fb4d900e7ef6d.tar.gz tcl-0271027790063e391fe23ca6c20fb4d900e7ef6d.tar.bz2 | |
[Bug 3606387]: Fix isolation of test scan-7.4.
| -rw-r--r-- | tests/scan.test | 2 |
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} { |