summaryrefslogtreecommitdiff
path: root/gen-testsuite-part
diff options
context:
space:
mode:
Diffstat (limited to 'gen-testsuite-part')
-rwxr-xr-xgen-testsuite-part2
1 files changed, 1 insertions, 1 deletions
diff --git a/gen-testsuite-part b/gen-testsuite-part
index dee4cddd2..57c1c6331 100755
--- a/gen-testsuite-part
+++ b/gen-testsuite-part
@@ -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}, $_)