Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Still more cosmetics
authormquinson <mquinson@48e7efb5-ca39-0410-a469-dd3cf9ba447f>
Thu, 8 Nov 2007 10:23:44 +0000 (10:23 +0000)
committermquinson <mquinson@48e7efb5-ca39-0410-a469-dd3cf9ba447f>
Thu, 8 Nov 2007 10:23:44 +0000 (10:23 +0000)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/simgrid/simgrid/trunk@4999 48e7efb5-ca39-0410-a469-dd3cf9ba447f

checkall

index 238b2ee..80415ca 100755 (executable)
--- 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     "\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) {
     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) {
     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) {
     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;
 }
 
     map {print "  $_\n";print LOG "  $_\n"} @fail;
 }