istemp
#define tempfree(x) if (istemp(x)) tfree(x)
#define tempfree(a) {if (istemp(a)) {xfree(a->sval); a->tval = 0; }}