Parent Directory
| 
Revision Log
| 
Patch
| revision 1.28 by wakaba, Mon Mar 3 11:56:18 2008 UTC | revision 1.30 by wakaba, Fri Mar 7 00:31:23 2008 UTC | |
|---|---|---|
| # | Line 26 BEGIN { | Line 26 BEGIN { |
| 26 | } | } |
| 27 | ||
| 28 | use Test; | use Test; |
| 29 | BEGIN { plan tests => 471 } | BEGIN { plan tests => 472 } |
| 30 | ||
| 31 | use Data::Dumper; | use Data::Dumper; |
| 32 | $Data::Dumper::Useqq = 1; | $Data::Dumper::Useqq = 1; |
| # | Line 45 if ($DEBUG) { | Line 45 if ($DEBUG) { |
| 45 | }; | }; |
| 46 | ||
| 47 | END { | END { |
| 48 | for my $id (sort {$a <=> $b || $a cmp $b} keys %$not_found) { | for my $id (sort {$a <=> $b || $a cmp $b} grep {!/^[ti]/} |
| 49 | keys %$not_found) { | |
| 50 | print "# checkpoint $id is not reached\n"; | print "# checkpoint $id is not reached\n"; |
| 51 | } | } |
| 52 | } | } |
|
||||||||
| [email protected] | ViewVC Help |
| Powered by ViewVC 1.1.24 |