test{all/standard}.g: do not finish early

Author: wilfwilson

tst/testall.g

@@ -1,11 +1,20 @@
-LoadPackage("digraphs");
-
-DigraphsMakeDoc();
-if DigraphsTestInstall()
-    and DigraphsTestStandard()
-    and DIGRAPHS_RunTest(DigraphsTestManualExamples)
-    and DigraphsTestExtreme() then
-  FORCE_QUIT_GAP(0);
+#############################################################################
+##
+#W  testall.g
+#Y  Copyright (C) 2021                                      Wilf A. Wilson
+##
+##  Licensing information can be found in the README file of this package.
+##
+#############################################################################
+##
+LoadPackage("digraphs", false);;
+opts := rec(earlyStop := false);
+if SizeBlist([DigraphsTestInstall(),
+              DigraphsTestStandard(opts),
+              DIGRAPHS_RunTest(DigraphsTestManualExamples),
+              DigraphsTestExtreme(opts)]) = 4 then
+  QUIT_GAP(0);
+else
+  QUIT_GAP(1);
 fi;
-
-FORCE_QUIT_GAP(1);
+FORCE_QUIT_GAP(1); # if we ever get here, there was an error

tst/teststandard.g

@@ -8,12 +8,12 @@
 #############################################################################
 ##
 LoadPackage("digraphs", false);;
-# These "{No} errors detected" lines currently have to be printed in this way
+# The "{No} errors detected" lines currently have to be printed in this way
 # to satisfy the automated GAP testing system that runs on Jenkins.
 # This requirement will hopefully go soon.
-if DigraphsTestInstall()
-    and DigraphsTestStandard()
-    and DIGRAPHS_RunTest(DigraphsTestManualExamples) then
+if SizeBlist([DigraphsTestInstall(),
+              DigraphsTestStandard(rec(earlyStop := false)),
+              DIGRAPHS_RunTest(DigraphsTestManualExamples)]) = 3 then
   Print("#I  No errors detected while testing\n\n");
   QUIT_GAP(0);
 else