99 static int substitute(union reptr *ipc);
101 static void command(union reptr *ipc);
108 	union reptr	*ipc;  in execute()  local
127 		ipc = pending;  in execute()
139 		for(ipc = ptrspace; ipc->r1.command; ) {  in execute()
141 			p1 = ipc->r1.ad1;  in execute()
142 			p2 = ipc->r1.ad2;  in execute()
146 				if(ipc->r1.inar) {  in execute()
152 							ipc->r1.inar = 0;  in execute()
153 							if(ipc->r1.negfl)  in execute()
155 							ipc++;  in execute()
159 							ipc->r1.inar = 0;  in execute()
162 						ipc->r1.inar = 0;  in execute()
166 						if(ipc->r1.negfl)  in execute()
168 						ipc++;  in execute()
175 						if(ipc->r1.negfl)  in execute()
177 						ipc++;  in execute()
181 						ipc->r1.inar = 1;  in execute()
184 						ipc->r1.inar = 1;  in execute()
186 					if(ipc->r1.negfl)  in execute()
188 					ipc++;  in execute()
193 			if(ipc->r1.negfl) {  in execute()
194 				ipc++;  in execute()
198 			command(ipc);  in execute()
205 				if((ipc = ipc->r2.lb1) == 0) {  in execute()
206 					ipc = ptrspace;  in execute()
210 				ipc++;  in execute()
246 substitute(union reptr *ipc)  in substitute()  argument
248 	if(match(ipc->r1.re1, 0) == 0)	return(0);  in substitute()
252 	dosub(ipc->r1.rhs, ipc->r1.gfl);  in substitute()
254 	if(ipc->r1.gfl) {  in substitute()
256 			if(match(ipc->r1.re1, 1) == 0) break;  in substitute()
257 			dosub(ipc->r1.rhs, ipc->r1.gfl);  in substitute()
328 command(union reptr *ipc)  in command()  argument
335 	switch(ipc->r1.command) {  in command()
342 				*aptr++ = ipc;  in command()
349 			if(!ipc->r1.inar || dolflag) {  in command()
350 				for(p1 = ipc->r1.re1; *p1; )  in command()
419 			for(p1 = ipc->r1.re1; *p1; )  in command()
505 				pending = ipc;  in command()
517 				pending = ipc;  in command()
550 				*aptr++ = ipc;  in command()
556 			i = substitute(ipc);  in command()
557 			if(ipc->r1.pfl && nflag && i)  in command()
558 				if(ipc->r1.pfl == 1) {  in command()
565 			if(i && ipc->r1.fcode)  in command()
577 			(void) fprintf(ipc->r1.fcode, "%s\n", linebuf);  in command()
578 			(void) fflush(ipc->r1.fcode);  in command()
596 			p2 = ipc->r1.re1;  in command()