31 #define	execute(p) r_execute(p)  macro
83 	(void) execute(a);  in run()
135 		x = execute(a[0]);  in program()
147 			x = execute(a[1]);  in program()
156 		x = execute(a[2]);  in program()
191 	fcn = execute(a[0]);	/* the function itself */  in call()
219 		y = execute(x);  in call()
254 	y = execute((Node *)(fcn->sval));	/* execute body */  in call()
327 			y = execute(a[0]);  in jump()
335 			y = execute(a[0]);  in jump()
372 		x = execute(a[2]);		/* filename */  in getaline()
384 				(void) setsval(execute(a[0]), buf);  in getaline()
404 			(void) setsval(execute(a[0]), buf);  in getaline()
431 	x = execute(a[0]);	/* Cell* for symbol table */  in array()
437 		y = execute(np);	/* subscript */  in array()
476 	x = execute(a[0]);	/* Cell* for symbol table */  in delete()
484 		y = execute(np);	/* subscript */  in delete()
513 	ap = execute(a[1]);	/* array name */  in intest()
521 		x = execute(p);	/* expr */  in intest()
558 	x = execute(a[1]);  in matchop()
563 		y = execute(a[2]);  in matchop()
593 	x = execute(a[0]);  in boolop()
600 		y = execute(a[1]);  in boolop()
607 		y = execute(a[1]);  in boolop()
627 	x = execute(a[0]);  in relop()
628 	y = execute(a[1]);  in relop()
696 	x = execute(a[0]);  in indirect()
716 	x = execute(a[0]);  in substr()
717 	y = execute(a[1]);  in substr()
719 		z = execute(a[2]);  in substr()
764 	x = execute(a[0]);  in sindex()
766 	y = execute(a[1]);  in sindex()
822 				x = execute(a);  in format()
872 		x = execute(a);  in format()
923 		(void) execute(a);  in format()
938 	x = execute(a[0]);  in a_sprintf()
957 	x = execute(a[0]);  in aprintf()
978 	x = execute(a[0]);  in arith()
982 		y = execute(a[1]);  in arith()
1045 	x = execute(a[0]);  in incrdecr()
1066 	y = execute(a[1]);  in assign()
1067 	x = execute(a[0]);	/* order reversed from before... */  in assign()
1128 	x = execute(a[0]);  in cat()
1129 	y = execute(a[1]);  in cat()
1156 		x = execute(a[1]);  in pastat()
1158 		x = execute(a[0]);  in pastat()
1161 			x = execute(a[1]);  in pastat()
1186 		x = execute(a[0]);  in dopa2()
1192 		x = execute(a[1]);  in dopa2()
1196 		x = execute(a[2]);  in dopa2()
1212 	y = execute(a[0]);	/* source string */  in split()
1217 		x = execute(a[2]);  in split()
1224 	ap = execute(a[1]);	/* array name */  in split()
1351 	x = execute(a[0]);  in condexpr()
1354 		x = execute(a[1]);  in condexpr()
1357 		x = execute(a[2]);  in condexpr()
1368 	x = execute(a[0]);  in ifstat()
1371 		x = execute(a[1]);  in ifstat()
1374 		x = execute(a[2]);  in ifstat()
1386 		x = execute(a[0]);  in whilestat()
1390 		x = execute(a[1]);  in whilestat()
1408 		x = execute(a[0]);  in dostat()
1414 		x = execute(a[1]);  in dostat()
1427 	x = execute(a[0]);  in forstat()
1431 			x = execute(a[1]);  in forstat()
1437 		x = execute(a[3]);  in forstat()
1443 		x = execute(a[2]);  in forstat()
1456 	vp = execute(a[0]);  in instat()
1457 	arrayp = execute(a[1]);  in instat()
1467 			x = execute(a[2]);  in instat()
1493 	x = execute(a[1]);  in bltin()
1516 			y = execute(a[1]->nnext);  in bltin()
1565 			(void) execute(nextarg);  in bltin()
1583 		y = execute(x);  in print()
1616 	x = execute(b);  in redirect()
1679 	x = execute(a[0]);  in closefile()
1739 	x = execute(a[3]);	/* target string */  in sub()
1744 		y = execute(a[1]);  in sub()
1748 	y = execute(a[2]);	/* replacement string */  in sub()
1806 	x = execute(a[3]);	/* target string */  in gsub()
1811 		y = execute(a[1]);  in gsub()
1815 	y = execute(a[2]);	/* replacement string */  in gsub()