32 Node *nodealloc(size_t n)  in nodealloc()
34 	Node *x;  in nodealloc()
36 	x = (Node *) malloc(sizeof(*x) + (n-1) * sizeof(x));  in nodealloc()
44 Node *exptostat(Node *a)  in exptostat()
50 Node *node1(int a, Node *b)  in node1()
52 	Node *x;  in node1()
60 Node *node2(int a, Node *b, Node *c)  in node2()
62 	Node *x;  in node2()
71 Node *node3(int a, Node *b, Node *c, Node *d)  in node3()
73 	Node *x;  in node3()
83 Node *node4(int a, Node *b, Node *c, Node *d, Node *e)  in node4()
85 	Node *x;  in node4()
96 Node *node5(int a, Node *b, Node *c, Node *d, Node *e, Node *f)  in node5()
98 	Node *x;  in node5()
110 Node *stat1(int a, Node *b)  in stat1()
112 	Node *x;  in stat1()
119 Node *stat2(int a, Node *b, Node *c)  in stat2()
121 	Node *x;  in stat2()
128 Node *stat3(int a, Node *b, Node *c, Node *d)  in stat3()
130 	Node *x;  in stat3()
137 Node *stat4(int a, Node *b, Node *c, Node *d, Node *e)  in stat4()
139 	Node *x;  in stat4()
146 Node *op1(int a, Node *b)  in op1()
148 	Node *x;  in op1()
155 Node *op2(int a, Node *b, Node *c)  in op2()
157 	Node *x;  in op2()
164 Node *op3(int a, Node *b, Node *c, Node *d)  in op3()
166 	Node *x;  in op3()
173 Node *op4(int a, Node *b, Node *c, Node *d, Node *e)  in op4()
175 	Node *x;  in op4()
182 Node *op5(int a, Node *b, Node *c, Node *d, Node *e, Node *f)  in op5()
184 	Node *x;  in op5()
191 Node *celltonode(Cell *a, int b)  in celltonode()
193 	Node *x;  in celltonode()
197 	x = node1(0, (Node *) a);  in celltonode()
202 Node *rectonode(void)	/* make $0 into a Node */  in rectonode()
208 Node *makearr(Node *p)  in makearr()
229 Node *pa2stat(Node *a, Node *b, Node *c)	/* pat, pat {...} */  in pa2stat()
231 	Node *x;  in pa2stat()
240 Node *linkum(Node *a, Node *b)  in linkum()
242 	Node *c;  in linkum()
256 void defn(Cell *v, Node *vl, Node *st)	/* turn on FCN bit in definition, */  in defn()
258 	Node *p;  in defn()
281 	extern Node *arglist;  in isarg()
282 	Node *p = arglist;  in isarg()
296 Node *itonp(int i)	/* and vice versa */  in itonp()
298 	return (Node *) (long) i;  in itonp()