summaryrefslogtreecommitdiff
path: root/gen-testsuite-part
diff options
context:
space:
mode:
authorStefano Lattarini <stefano.lattarini@gmail.com>2014-12-22 17:56:22 +0100
committerStefano Lattarini <stefano.lattarini@gmail.com>2014-12-22 17:56:22 +0100
commit88ac92b2d5beaf4aee7d7bb4f3dc9a86da823550 (patch)
tree16c1527969be06b21275e997f559333b738c8be5 /gen-testsuite-part
parent4179284a3de093f3578a67c9b258a0d91eb4b6be (diff)
parent912383451a4a394383a8e95240e3e98ee68faf72 (diff)
downloadautomake-88ac92b2d5beaf4aee7d7bb4f3dc9a86da823550.tar.gz
Merge branch 'micro' into minor
* micro: cleanup: refactor code to initialize DIST_COMMON dist: ordering of files in DIST_COMMON is deterministic now tests: refactor some tests on DIST_COMMON maint: make output of 'gen-testsuite-part' deterministic When computing lispdir, don't load emacs site wide init file. PATH: quote $(PATH_SEPARATOR) as well Improve detection of GNU make, avoiding "Arg list too long" errors.
Diffstat (limited to 'gen-testsuite-part')
-rwxr-xr-xgen-testsuite-part8
1 files changed, 5 insertions, 3 deletions
diff --git a/gen-testsuite-part b/gen-testsuite-part
index 98f8c24da..46ae56d56 100755
--- a/gen-testsuite-part
+++ b/gen-testsuite-part
@@ -283,8 +283,9 @@ foreach my $test (@all_tests)
$wrapper_setups{$test} = \@setups if @setups;
}
# And now create all the wrapper tests.
-while (my ($wrapped_test, $setup_list) = each %wrapper_setups)
+for my $wrapped_test (sort keys %wrapper_setups)
{
+ my $setup_list = $wrapper_setups{$wrapped_test};
(my $base = $wrapped_test) =~ s/\.([^.]*)$//;
my $suf = $1 or die "$me: test '$wrapped_test' lacks a suffix\n";
my $count = 0;
@@ -345,7 +346,7 @@ my %depmodes =
foreach my $lt (TRUE, FALSE)
{
- foreach my $m (keys %depmodes)
+ foreach my $m (sort keys %depmodes)
{
my $planned = ($lt && $m eq "auto") ? 84 : 28;
my @required =
@@ -400,8 +401,9 @@ print <<EOF;
EOF
-while (my ($k, $x) = each %deps_extractor)
+for my $k (sort keys %deps_extractor)
{
+ my $x = $deps_extractor{$k};
my $dist_prereqs = $x->{dist_prereqs} || "";
my $nodist_prereqs = $x->{nodist_prereqs} || "";
my @tests = grep { line_match $x->{line_matcher}, $_ } @all_tests;