X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/6cbdb08389ff1e88cf34833b1795e646ffac2dc0..682d5bf3e9ce21ce5163ca767fc5c592b51814ba:/checkall diff --git a/checkall b/checkall index 238b2ee526..80415cacaf 100755 --- a/checkall +++ b/checkall @@ -68,23 +68,23 @@ print LOG "\n$dashes\n$banner\n$dashes\n\n"; print "\n$dashes\n$banner (full logs in checkall.log)\n$dashes\n\n"; if (scalar @skip) { - print LOG (scalar @skip)." skipped tests:\n"; - print (scalar @skip)." 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 (scalar @xpass)." unexpected pass:\n"; - print (scalar @xpass)." 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"; + 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 (scalar @fail)." failed tests:\n"; - print (scalar @fail)." failed tests:\n"; + print LOG "* ".(scalar @fail)." failed tests:\n"; + print "* ".(scalar @fail)." failed tests:\n"; map {print " $_\n";print LOG " $_\n"} @fail; }