X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/05d08dda9b06ef25d9eff37873249d26056dcb16..682d5bf3e9ce21ce5163ca767fc5c592b51814ba:/checkall diff --git a/checkall b/checkall index 7cf2a7a096..80415cacaf 100755 --- a/checkall +++ b/checkall @@ -65,21 +65,26 @@ $banner = "# $banner #"; my $dashes = $banner; $dashes =~ s/./#/g; print LOG "\n$dashes\n$banner\n$dashes\n\n"; -print "\n$dashes\n$banner (full logs in checkall.pl)\n$dashes\n\n"; +print "\n$dashes\n$banner (full logs in checkall.log)\n$dashes\n\n"; if (scalar @skip) { - print LOG "Skipped tests:\n"; - print "Skipped tests:\n"; + print LOG "* ".(scalar @skip)." skipped tests:\n"; + print "* ".(scalar @skip)." skipped tests:\n"; map {print " $_\n";print LOG " $_\n"} @skip; } if (scalar @xpass) { - print LOG "Unexpected pass:\n"; - print "Unexpected pass:\n"; + print LOG "* ".(scalar @xpass)." unexpected pass:\n"; + print "* ".(scalar @xpass)." unexpected pass:\n"; map {print " $_\n";print LOG " $_\n"} @xpass; } +if (scalar @xfail) { + print LOG "* ".(scalar @xfail)." expected failures:\n"; + print "* ".(scalar @xfail)." expected failures:\n"; + map {print " $_\n";print LOG " $_\n"} @xfail; +} if (scalar @fail) { - print LOG "Failed tests:\n"; - print "Failed tests:\n"; + print LOG "* ".(scalar @fail)." failed tests:\n"; + print "* ".(scalar @fail)." failed tests:\n"; map {print " $_\n";print LOG " $_\n"} @fail; }