34 	Node *x;  in nodealloc()  local
36 	x = (Node *) malloc(sizeof(Node) + (n-1)*sizeof(Node *));  in nodealloc()
37 	if (x == NULL)  in nodealloc()
39 	x->nnext = NULL;  in nodealloc()
40 	x->lineno = lineno;  in nodealloc()
41 	return(x);  in nodealloc()
52 	Node *x;  in node1()  local
54 	x = nodealloc(1);  in node1()
55 	x->nobj = a;  in node1()
56 	x->narg[0]=b;  in node1()
57 	return(x);  in node1()
62 	Node *x;  in node2()  local
64 	x = nodealloc(2);  in node2()
65 	x->nobj = a;  in node2()
66 	x->narg[0] = b;  in node2()
67 	x->narg[1] = c;  in node2()
68 	return(x);  in node2()
73 	Node *x;  in node3()  local
75 	x = nodealloc(3);  in node3()
76 	x->nobj = a;  in node3()
77 	x->narg[0] = b;  in node3()
78 	x->narg[1] = c;  in node3()
79 	x->narg[2] = d;  in node3()
80 	return(x);  in node3()
85 	Node *x;  in node4()  local
87 	x = nodealloc(4);  in node4()
88 	x->nobj = a;  in node4()
89 	x->narg[0] = b;  in node4()
90 	x->narg[1] = c;  in node4()
91 	x->narg[2] = d;  in node4()
92 	x->narg[3] = e;  in node4()
93 	return(x);  in node4()
98 	Node *x;  in stat1()  local
100 	x = node1(a,b);  in stat1()
101 	x->ntype = NSTAT;  in stat1()
102 	return(x);  in stat1()
107 	Node *x;  in stat2()  local
109 	x = node2(a,b,c);  in stat2()
110 	x->ntype = NSTAT;  in stat2()
111 	return(x);  in stat2()
116 	Node *x;  in stat3()  local
118 	x = node3(a,b,c,d);  in stat3()
119 	x->ntype = NSTAT;  in stat3()
120 	return(x);  in stat3()
125 	Node *x;  in stat4()  local
127 	x = node4(a,b,c,d,e);  in stat4()
128 	x->ntype = NSTAT;  in stat4()
129 	return(x);  in stat4()
134 	Node *x;  in op1()  local
136 	x = node1(a,b);  in op1()
137 	x->ntype = NEXPR;  in op1()
138 	return(x);  in op1()
143 	Node *x;  in op2()  local
145 	x = node2(a,b,c);  in op2()
146 	x->ntype = NEXPR;  in op2()
147 	return(x);  in op2()
152 	Node *x;  in op3()  local
154 	x = node3(a,b,c,d);  in op3()
155 	x->ntype = NEXPR;  in op3()
156 	return(x);  in op3()
161 	Node *x;  in op4()  local
163 	x = node4(a,b,c,d,e);  in op4()
164 	x->ntype = NEXPR;  in op4()
165 	return(x);  in op4()
170 	Node *x;  in celltonode()  local
174 	x = node1(0, (Node *) a);  in celltonode()
175 	x->ntype = NVALUE;  in celltonode()
176 	return(x);  in celltonode()
208 	Node *x;  in pa2stat()  local
210 	x = node4(PASTAT2, a, b, c, itonp(paircnt));  in pa2stat()
213 	x->ntype = NSTAT;  in pa2stat()
214 	return(x);  in pa2stat()