test/regress.h

   1
   2 #define MAIN(x) regress##x
   3 #include "test.h"
   4 #include "a/regress.h"
   5
   6 static void test_odm(int argc, char *argv[])
   7 {
   8     a_float *p, *odm;
   9     a_size i, n = a_cast_s(a_size, argc);
  10
  11     p = a_new(a_float, A_NULL, n);
  12     for (i = 0; i < n; ++i)
  13     {
  14         char *endptr;
  15         p[i] = strtonum(argv[i], &endptr);
  16     }
  17
  18     odm = a_new(a_float, A_NULL, n);
  19     debug("{");
  20     for (i = 0; i < n; ++i)
  21     {
  22         debug("%c" A_FLOAT_PRI("", "g"), i ? ',' : 0, p[i]);
  23     }
  24     debug("}:" A_FLOAT_PRI("", "g\n{"), a_regress_odm(n, p, odm));
  25     for (i = 0; i < n; ++i)
  26     {
  27         debug("%c" A_FLOAT_PRI("", "g"), i ? ',' : 0, odm[i]);
  28     }
  29     debug("}\n");
  30
  31     a_die(odm);
  32     a_die(p);
  33 }
  34
  35 #include "a/hash.h"
  36
  37 int main(int argc, char *argv[]) /* NOLINT(misc-definitions-in-headers) */
  38 {
  39     if (argc < 2)
  40     {
  41         test_odm(argc - 1, argv + 1);
  42         return 0;
  43     }
  44
  45     switch (a_hash_bkdr(argv[1], 0))
  46     {
  47     case 0x001D4480: /* odm */
  48         test_odm(argc - 2, argv + 2);
  49         break;
  50     default:
  51         debug("odm\n");
  52     }
  53
  54     return 0;
  55 }