rem: Node *concat(np) Node *np;
add: concat(Node *np)
context: Node *concat(np)	Node *np;{	switch (rtok) {	case CHAR: case DOT: case ALL: case CCL: case NCCL: case '$': case '(':		return (concat(op2(CAT, np, primary())));	default:		return (np);	}}