107 	char *p1, *p2;  in execute()  local
141 			p1 = ipc->r1.ad1;  in execute()
144 			if(p1) {  in execute()
148 						p1 = 0;  in execute()
164 				} else if(*p1 == CEND) {  in execute()
172 				} else if(*p1 == CLNUM) {  in execute()
173 					c = (unsigned char)p1[1];  in execute()
182 				} else if(match(p1, 0)) {  in execute()
214 			for(p1 = linebuf; p1 < spend; p1++)  in execute()
215 				(void) putc(*p1, stdout);  in execute()
231 	char   *p1;  in match()  local
235 		locs = p1 = loc2;  in match()
237 		p1 = linebuf;  in match()
242 	return(step(p1, expbuf));  in match()
331 	char   *p1, *p2, *p3;  in command()  local
350 				for(p1 = ipc->r1.re1; *p1; )  in command()
351 					(void) putc(*p1++, stdout);  in command()
359 			p1 = p2 = linebuf;  in command()
361 			while(*p1 != '\n') {  in command()
362 				if(*p1++ == 0) {  in command()
368 			p1++;  in command()
369 			while(*p2++ = *p1++);  in command()
379 			p1 = linebuf;  in command()
381 			while(*p1++ = *p2++);  in command()
382 			spend = p1-1;  in command()
387 			p1 = spend;  in command()
390 				if (p1 == &linebuf[LBSIZE+1]) {  in command()
392 					*--p1 = '\0';  in command()
394 			} while(*p1++ = *p2++);  in command()
395 			spend = p1-1;  in command()
399 			p1 = holdsp;  in command()
401 			while(*p1++ = *p2++);  in command()
402 			hspend = p1-1;  in command()
407 			p1 = hspend;  in command()
410 				if (p1 == &holdsp[LBSIZE+1]) {  in command()
412 					*--p1 = '\0';  in command()
414 			} while(*p1++ = *p2++);  in command()
415 			hspend = p1-1;  in command()
419 			for(p1 = ipc->r1.re1; *p1; )  in command()
420 				(void) putc(*p1++, stdout);  in command()
430 			p1 = linebuf;  in command()
433 			while(*p1)  in command()
434 				if((unsigned char)*p1 >= 040) {  in command()
435 					if(*p1 == 0177) {  in command()
444 						p1++;  in command()
447 					if(!isprint(*p1 & 0377)) {  in command()
454 						*p2++ = (*p1 >> 6) + '0';  in command()
460 						*p2++ = ((*p1 >> 3) & 07) + '0';  in command()
466 						*p2++ = (*p1++ & 07) + '0';  in command()
473 						*p2++ = *p1++;  in command()
481 					p3 = trans[(unsigned char)*p1-1];  in command()
489 					p1++;  in command()
497 				for(p1 = linebuf; p1 < spend; p1++)  in command()
498 					(void) putc(*p1, stdout);  in command()
525 			for(p1 = linebuf; p1 < spend; p1++)  in command()
526 				(void) putc(*p1, stdout);  in command()
531 			for(p1 = linebuf; *p1 != '\n' && *p1 != '\0'; )  in command()
532 				(void) putc(*p1++, stdout);  in command()
538 				for(p1 = linebuf; p1 < spend; p1++)  in command()
539 					(void) putc(*p1, stdout);  in command()
559 					for(p1 = linebuf; p1 < spend; p1++)  in command()
560 						(void) putc(*p1, stdout);  in command()
581 			p1 = linebuf;  in command()
583 			while(*p2++ = *p1++);  in command()
584 			p1 = holdsp;  in command()
586 			while(*p2++ = *p1++);  in command()
588 			p1 = genbuf;  in command()
590 			while(*p2++ = *p1++);  in command()
595 			p1 = linebuf;  in command()
597 			while(*p1 = p2[(unsigned char)*p1])	p1++;  in command()
606 	char   *p1, *p2;  local
609 	p1 = addr;
646 		if(p1 < &linebuf[LBSIZE])
647 			*p1++ = c;
650 	*p1 = 0;
653 	return(p1);
735 	char   *p1;  in arout()  local
743 			for(p1 = (*aptr)->r1.re1; *p1; )  in arout()
744 				(void) putc(*p1++, stdout);  in arout()