1 76193d7c 2003-09-30 devnull #include "mk.h"
4 76193d7c 2003-09-30 devnull setvar(char *name, void *value)
6 76193d7c 2003-09-30 devnull symlook(name, S_VAR, value)->value = value;
7 76193d7c 2003-09-30 devnull symlook(name, S_MAKEVAR, (void*)"");
10 76193d7c 2003-09-30 devnull static void
11 76193d7c 2003-09-30 devnull print1(Symtab *s)
15 76193d7c 2003-09-30 devnull Bprint(&bout, "\t%s=", s->name);
16 76193d7c 2003-09-30 devnull for (w = (Word *) s->value; w; w = w->next)
17 76193d7c 2003-09-30 devnull Bprint(&bout, "'%s'", w->s);
18 76193d7c 2003-09-30 devnull Bprint(&bout, "\n");
22 76193d7c 2003-09-30 devnull dumpv(char *s)
24 76193d7c 2003-09-30 devnull Bprint(&bout, "%s:\n", s);
25 76193d7c 2003-09-30 devnull symtraverse(S_VAR, print1);
29 76193d7c 2003-09-30 devnull shname(char *a)
34 76193d7c 2003-09-30 devnull while (*a) {
35 76193d7c 2003-09-30 devnull n = chartorune(&r, a);
36 76193d7c 2003-09-30 devnull if (!WORDCHR(r))
40 76193d7c 2003-09-30 devnull return a;