131 #define	INSERT(op, pos)	doinsert(p, (sop)(op), HERE()-(pos)+1, pos)  argument
132 #define	AHEAD(pos)		dofwd(p, pos, HERE()-(pos))  argument
133 #define	ASTERN(sop, pos)	EMIT(sop, HERE()-pos)  argument
295 	sopno pos;  in p_ere_exp()  local
304 	pos = HERE();  in p_ere_exp()
388 		INSERT(OPLUS_, pos);  in p_ere_exp()
389 		ASTERN(O_PLUS, pos);  in p_ere_exp()
390 		INSERT(OQUEST_, pos);  in p_ere_exp()
391 		ASTERN(O_QUEST, pos);  in p_ere_exp()
394 		INSERT(OPLUS_, pos);  in p_ere_exp()
395 		ASTERN(O_PLUS, pos);  in p_ere_exp()
399 		INSERT(OCH_, pos);		/* offset slightly wrong */  in p_ere_exp()
400 		ASTERN(OOR1, pos);		/* this one's right */  in p_ere_exp()
401 		AHEAD(pos);			/* fix the OCH_ */  in p_ere_exp()
416 		repeat(p, pos, count, count2);  in p_ere_exp()
494 	sopno pos;  in p_simp_re()  local
499 	pos = HERE();		/* repetion op, if any, covers from here */  in p_simp_re()
573 		INSERT(OPLUS_, pos);  in p_simp_re()
574 		ASTERN(O_PLUS, pos);  in p_simp_re()
575 		INSERT(OQUEST_, pos);  in p_simp_re()
576 		ASTERN(O_QUEST, pos);  in p_simp_re()
587 		repeat(p, pos, count, count2);  in p_simp_re()
1323 doinsert(struct parse *p, sop op, size_t opnd, sopno pos)  in doinsert()  argument
1339 	assert(pos > 0);  in doinsert()
1341 		if (p->pbegin[i] >= pos) {  in doinsert()
1344 		if (p->pend[i] >= pos) {  in doinsert()
1349 	memmove((char *)&p->strip[pos+1], (char *)&p->strip[pos],  in doinsert()
1350 						(HERE()-pos-1)*sizeof(sop));  in doinsert()
1351 	p->strip[pos] = s;  in doinsert()
1358 dofwd(struct parse *p, sopno pos, sop value)  in dofwd()  argument
1365 	p->strip[pos] = OP(p->strip[pos]) | value;  in dofwd()