chiark / gitweb /
@@@ tty mess
[mLib] / struct / t / sym-test.c
index 1862a8742028028ccd114979f124ded7dfe8a646..5bbbff80d09b5ac60bda69108e4646ac8d038e1f 100644 (file)
@@ -5,6 +5,7 @@
 
 #include "macros.h"
 #include "sym.h"
+#include "unihash.h"
 
 typedef struct word {
   sym_base _b;
@@ -57,6 +58,9 @@ int main(void)
        puts("*MISSING*");
     } else if (STRCMP(p, ==, "count")) {
       printf("%lu\n", (unsigned long)n);
+    } else if (STRCMP(p, ==, "seed")) {
+      char *k = strtok(0, " ");
+      unihash_setkey(&unihash_global, strtoul(k, 0, 0));
     } else if (STRCMP(p, ==, "show")) {
       sym_iter i;
       word *w;