tfree
tfree(tp->val.t, tp->areap);
tfree(tp->val.t, tp->areap);
tfree(t->left, ap);
tfree(t->right, ap);
void tfree(struct op *, Area *);
extern void tfree(Cell *);
#define tempfree(x) do { if (istemp(x)) tfree(x); } while (/*CONSTCOND*/0)
tfree(p);