projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
20f8267
)
strictifying t/TEST stopped it handling '1..n todo' correctly
author
Dave Mitchell
<davem@fdisolutions.com>
Thu, 5 May 2005 12:01:51 +0000
(12:01 +0000)
committer
Dave Mitchell
<davem@fdisolutions.com>
Thu, 5 May 2005 12:01:51 +0000
(12:01 +0000)
(made scope of %toto too narrow)
p4raw-id: //depot/perl@24392
t/TEST
patch
|
blob
|
history
diff --git
a/t/TEST
b/t/TEST
index
88e40fd
..
15c6da9
100755
(executable)
--- a/
t/TEST
+++ b/
t/TEST
@@
-410,13
+410,13
@@
EOT
my $seen_ok = 0;
my $trailing_leader = 0;
my $max;
+ my %todo;
while (<RESULTS>) {
next if /^\s*$/; # skip blank lines
if ($::verbose) {
print $_;
}
unless (/^\#/) {
- my %todo;
if ($trailing_leader) {
# shouldn't be anything following a postfix 1..n
$failure = 'extra output after trailing 1..n';