Changeset f9a89882 in tol

Timestamp:

Jun 17, 2010, 10:25:15 AM (16 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

0fbfbf2

Parents:

b5e3f5e

Message:

Avoiding empty batteries

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@2279 be4846ae-f051-483a-831f-b64e7d08527f

File:

• tol/stdlib/general/tol_tests/_testFunc.tol (modified) (5 diffs)

tol/stdlib/general/tol_tests/_testFunc.tol

@@ -113 +113 @@
 //////////////////////////////////////////////////////////////////////////////
 {
+  If(!Card(tests), Copy(Empty), {
   Set tr = Traspose(tests);
   Set stats = 
@@ -137 +138 @@
           "\n  avgSeconds   = "<<avgSeconds+"\n\n");
   stats
-};
+})};
 
 //////////////////////////////////////////////////////////////////////////////
@@ -188 +189 @@
   Text indicator = Case
   (
+    !Card(stats),                                 "NONE",
     stats["minQuality"]<=MinQualityForError,      "FAIL",
     Or(stats["avgQuality"]<=AvgQualityForWarning,
@@ -235 +237 @@
     Set tests = BSTFile(aux,dirResult+"/test.results.bst");
     Set stats = CalcReportStats(title, tests);
-    Set batteryReport = BSTFile([[strTestBattery
+    Set batteryReport = If(!Card(stats), stats, BSTFile([[strTestBattery
     (
       baseDir,
@@ -254 +256 @@
       stats["avgObjects"],
       stats["avgSeconds"]
-    )]], dirResult+"/battery_report.bst");
+    )]], dirResult+"/battery_report.bst"));
     batteryResult = [[batteryReport, tests]]
   })