32 Node *nodealloc(int n)  in nodealloc()
34 	Node *x;  in nodealloc()
36 	x = (Node *) malloc(sizeof(Node) + (n-1)*sizeof(Node *));  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 *stat1(int a, Node *b)  in stat1()
98 	Node *x;  in stat1()
105 Node *stat2(int a, Node *b, Node *c)  in stat2()
107 	Node *x;  in stat2()
114 Node *stat3(int a, Node *b, Node *c, Node *d)  in stat3()
116 	Node *x;  in stat3()
123 Node *stat4(int a, Node *b, Node *c, Node *d, Node *e)  in stat4()
125 	Node *x;  in stat4()
132 Node *op1(int a, Node *b)  in op1()
134 	Node *x;  in op1()
141 Node *op2(int a, Node *b, Node *c)  in op2()
143 	Node *x;  in op2()
150 Node *op3(int a, Node *b, Node *c, Node *d)  in op3()
152 	Node *x;  in op3()
159 Node *op4(int a, Node *b, Node *c, Node *d, Node *e)  in op4()
161 	Node *x;  in op4()
168 Node *celltonode(Cell *a, int b)  in celltonode()
170 	Node *x;  in celltonode()
174 	x = node1(0, (Node *) a);  in celltonode()
179 Node *rectonode(void)	/* make $0 into a Node */  in rectonode()
185 Node *makearr(Node *p)  in makearr()
206 Node *pa2stat(Node *a, Node *b, Node *c)	/* pat, pat {...} */  in pa2stat()
208 	Node *x;  in pa2stat()
217 Node *linkum(Node *a, Node *b)  in linkum()
219 	Node *c;  in linkum()
233 void defn(Cell *v, Node *vl, Node *st)	/* turn on FCN bit in definition, */  in defn()
235 	Node *p;  in defn()
258 	extern Node *arglist;  in isarg()
259 	Node *p = arglist;  in isarg()
273 Node *itonp(int i)	/* and vice versa */  in itonp()
275 	return (Node *) (long) i;  in itonp()