complete-run: enable autoflush (useful for debugging)
I used the following command to find hanging workers: sort latest/complete-run.log|cut -f 2 -d ' '|uniq -c|grep -v '^[ \t]*2'
This commit is contained in:
parent
91786c3801
commit
d92626bc62
|
@ -15,6 +15,7 @@ use TAP::Harness;
|
||||||
use TAP::Parser;
|
use TAP::Parser;
|
||||||
use TAP::Parser::Aggregator;
|
use TAP::Parser::Aggregator;
|
||||||
use Time::HiRes qw(time);
|
use Time::HiRes qw(time);
|
||||||
|
use IO::Handle;
|
||||||
# these are shipped with the testsuite
|
# these are shipped with the testsuite
|
||||||
use lib qw(lib);
|
use lib qw(lib);
|
||||||
use StartXDummy;
|
use StartXDummy;
|
||||||
|
@ -127,6 +128,7 @@ printf("\nRough time estimate for this run: %.2f seconds\n\n", $timings{GLOBAL})
|
||||||
|
|
||||||
my $logfile = "$outdir/complete-run.log";
|
my $logfile = "$outdir/complete-run.log";
|
||||||
open $log, '>', $logfile or die "Could not create '$logfile': $!";
|
open $log, '>', $logfile or die "Could not create '$logfile': $!";
|
||||||
|
$log->autoflush(1);
|
||||||
say "Writing logfile to '$logfile'...";
|
say "Writing logfile to '$logfile'...";
|
||||||
|
|
||||||
# 3: run all tests
|
# 3: run all tests
|
||||||
|
|
Loading…
Reference in New Issue