Atom
MakeAtom(string, len, makeit)
char *string;
unsigned len;
Bool makeit;
char *
NameForAtom(atom)
Atom atom;
...{
NodePtr node;
if (atom > lastAtom) return 0;
if ((node = nodeTable[atom]) == (NodePtr)NULL) return 0;
return node->string;
} 
void
FreeAtom(NodePtr patom)
...{
if(patom->left)
FreeAtom(patom->left);
if(patom->right)
FreeAtom(patom->right);
if (patom->a > XA_LAST_PREDEFINED)
xfree(patom->string);
xfree(patom);
}
用户评论