mirror of
https://github.com/vishapoberon/compiler.git
synced 2026-04-06 09:52:24 +00:00
Test build progress
This commit is contained in:
parent
d97668a209
commit
3cd3376139
3 changed files with 107 additions and 6 deletions
|
|
@ -50,5 +50,35 @@ for my $machine (sort keys %machines) {
|
|||
}
|
||||
|
||||
while ((my $pid = wait) > 0) {print "Child pid $pid completed.\n";}
|
||||
print "Buildall complete.\n";
|
||||
exit;
|
||||
|
||||
|
||||
# # All builds have completed. Now scan the logs for pass/fail and build the passing report.
|
||||
#
|
||||
# my %status = ();
|
||||
# open(my $logs, "/tmp/buildall.log") // die "Couldn't open combined build log.";
|
||||
# while (<$logs>) {
|
||||
# if (/^([^ ]+) ([^ ]+) --- Branch ([^ ]+) ([^ ]+) ([^ ]+) ([^ ]+) confidence tests passed ---/) {
|
||||
# $status{$1} = [$2, $3, $4, $5, $6];
|
||||
# }
|
||||
# }
|
||||
# close(my $logs);
|
||||
#
|
||||
#
|
||||
# sub svgtext {
|
||||
# my ($f, $x, $y, $msg) = @_;
|
||||
# print($f "<text x=\"$x\" y=\"$y\" font-family=\"Verdana\" font-size=\"18\" font-fill=\"black\">";
|
||||
# print($f $msg);
|
||||
# print($f "</text>\n");
|
||||
# }
|
||||
#
|
||||
#
|
||||
# open(my $svg, ">passing.svg") // dir "Could not create passing.svg.");
|
||||
# print $svg '<svg width="10cm" height="3cm" viewBox="0 0 1000 300" xmlns="http://www.w3.org/2000/svg" version="1.1">\n';
|
||||
#
|
||||
# my $i=1;
|
||||
# for my $host (sort keys %status) {
|
||||
# svgtext($svg, 10, $i*20, $host);
|
||||
# $i++;
|
||||
# }
|
||||
#
|
||||
# print $svg '</svg>\n';
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue