qcsrc/lib/test.qc

   1 #include "test.qh"
   2
   3 int TEST_RunAll_accumulated(int init);
   4 bool RUN_ALL_TESTS()
   5 {
   6         int f = TEST_RunAll_accumulated(0);
   7         if (f)
   8         {
   9                 LOG_INFOF("%d tests failed", f);
  10                 return true;
  11         }
  12         else
  13         {
  14                 LOG_INFO("All tests OK");
  15                 return false;
  16         }
  17 }
  18
  19 bool TEST_Run(string s)
  20 {
  21         LOG_INFOF("%s: testing...", s);
  22         TEST_failed = 0;
  23         TEST_fatal = 0;
  24         TEST_ok = false;
  25         string fn = strcat("_TEST_", s);
  26         if (isfunction(fn)) callfunction(fn);
  27         if (TEST_failed > 0)
  28         {
  29                 LOG_INFOF("%s: %d items failed.", s, TEST_failed);
  30                 return false;
  31         }
  32         else if (!TEST_ok)
  33         {
  34                 LOG_INFOF("%s: did not complete.", s);
  35                 return false;
  36         }
  37         return true;
  38 }