diff options
| author | Jeremy Harris <jgh146exb@wizmail.org> | 2017-02-18 23:07:14 +0000 |
|---|---|---|
| committer | Jeremy Harris <jgh146exb@wizmail.org> | 2017-02-18 23:07:14 +0000 |
| commit | 1a13c13c325cdb119fdf68a6d9ecffcaa2c3756d (patch) | |
| tree | 609aa5febf5c761480ea80997330a811d2d3178c /test/runtest | |
| parent | 505162ede95fd7fcf4ce62692dee816ad8f8c84f (diff) | |
Testsuite: add option to insert delays, for very slow test platforms
An emulated PPC, running as a VM on x86_64, was seeing testcase fails where
the trailing few log line were missing in munged output, despite on inspection
being present in the spool. Adding a delay before the munge-and-compare
made the issue go away.
Diffstat (limited to 'test/runtest')
| -rwxr-xr-x | test/runtest | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/test/runtest b/test/runtest index d117751c4..b82b6b98c 100755 --- a/test/runtest +++ b/test/runtest @@ -61,6 +61,7 @@ my $more = 'less -XF'; my $optargs = ''; my $save_output = 0; my $server_opts = ''; +my $slow = 0; my $valgrind = 0; my $have_ipv4 = 1; @@ -2550,6 +2551,7 @@ while (@ARGV > 0 && $ARGV[0] =~ /^-/) if ($arg eq "-NOIPV4") { $have_ipv4 = 0; next; } if ($arg eq "-NOIPV6") { $have_ipv6 = 0; next; } if ($arg eq "-KEEP") { $save_output = 1; next; } + if ($arg eq "-SLOW") { $slow = 1; next; } if ($arg eq "-VALGRIND") { $valgrind = 1; next; } if ($arg =~ /^-FLAVOU?R$/) { $flavour = shift; next; } } @@ -3997,6 +3999,7 @@ foreach $test (@test_list) if ($docheck) { + sleep 1 if $slow; my $rc = check_output($TEST_STATE->{munge}); log_test($log_summary_filename, $testno, 'P') if ($rc == 0); if ($rc < 2) |