tests: simplify a loop in gen-testsuite-part
authorStefano Lattarini <stefano.lattarini@gmail.com>
Fri, 26 Oct 2012 09:04:14 +0000 (11:04 +0200)
committerStefano Lattarini <stefano.lattarini@gmail.com>
Fri, 26 Oct 2012 09:04:14 +0000 (11:04 +0200)
* gen-testsuite-part: No need to loop on the (key, value) entries
of the %test_generators has: we only use the value, and never the
key.  So loop simply on the values.

Signed-off-by: Stefano Lattarini <stefano.lattarini@gmail.com>
gen-testsuite-part

index dee4cdd..57c1c63 100755 (executable)
@@ -273,7 +273,7 @@ EOF
 # FIXME: the following is not really right, since cannot compose wrapping
 # of tests matching more than one condition.  Still, there should be no
 # such test at the moment, so the limitation is (temporarily) acceptable.
-while (my ($k, $g) = each %test_generators)
+foreach my $g (values %test_generators)
   {
     my @wrapped_tests = grep {
       line_match ($g->{line_matcher}, $_)