astree* new_func (int symbol,
astree* a,
astree* b,
astree* c) {
astree* t = new_astree(symbol,
a->filenr,
a->linenr,
a->offset,
"");
return adopt3(t, a, b, c);
}
astree adopt3sym (astree root, astree left, astree middle,
astree right, int symbol) {
root = adopt3(root, left, middle, right);
root->symbol = symbol;
return root;
}