run-px: more summary, exit code.

diff --git a/tests/ChangeLog b/tests/ChangeLog
index 888bd8c119c291798a27ed2f4efa670644492cf9..3efa37bf22cdb5a249dbac86ef2ebb943d362298 100644 (file)
--- a/tests/ChangeLog
+++ b/tests/ChangeLog
@@ -25,6 +25,8 @@
        WgetTest.pm.in: Use whatever ports are available, rather than
        hard-coded ones.
 
+       * run-px: More summary info, explicit exit code.
+
        * Makefile.am: Reinstate "run-px-tests" as a dependency for the
        "check" target.
 

diff --git a/tests/run-px b/tests/run-px
index febb0de4db001ada69b256443d21398624d206fa..37f14324d59f535a4fb99d5d215aa46719fe9aef 100755 (executable)
--- a/tests/run-px
+++ b/tests/run-px
@@ -61,3 +61,10 @@ for (my $i=0; $i != @tests; ++$i) {
     }
     print "$tests[$i]\n";
 }
+
+print "\n";
+print scalar(@results) . " tests were run\n";
+print scalar(grep $_ == 0, @results) . " PASS\n";
+print scalar(grep $_ != 0, @results) . " FAIL\n";
+
+exit scalar (grep $_ != 0, @results);