130 po_ungetc(struct ch *pch)  in po_ungetc()  argument
136 	if (!pch->eof) {  in po_ungetc()
137 		backlen = pch->len;  in po_ungetc()
138 		(void) memcpy(backbuf, pch->buf, backlen);  in po_ungetc()
219 	struct ch	*pch;  in expand_es()  local
221 	pch = po_getc();  in expand_es()
222 	if (pch->eof) {  in expand_es()
227 	if (pch->len > 1) {  in expand_es()
229 		return (pch);  in expand_es()
234 	switch (pch->buf[0]) {  in expand_es()
237 		och.buf[0] = pch->buf[0];  in expand_es()
269 		c = pch->buf[0];  in expand_es()
275 			pch = po_getc();  in expand_es()
276 			if (pch->eof) {  in expand_es()
281 			if ((pch->len > 1) || (pch->buf[0] < '0') ||  in expand_es()
282 				(pch->buf[0] > '7'))  in expand_es()
284 			c = pch->buf[0];  in expand_es()
286 		po_ungetc(pch);  in expand_es()
291 		pch = po_getc();  in expand_es()
292 		if (pch->eof) {  in expand_es()
297 		if (pch->len > 1) {  in expand_es()
298 			po_ungetc(pch);  in expand_es()
302 		c = pch->buf[0];  in expand_es()
304 			po_ungetc(pch);  in expand_es()
316 		pch = po_getc();  in expand_es()
317 		if (pch->eof) {  in expand_es()
322 		if (pch->len > 1) {  in expand_es()
323 			po_ungetc(pch);  in expand_es()
327 		c = pch->buf[0];  in expand_es()
329 			po_ungetc(pch);  in expand_es()
345 		och.buf[0] = pch->buf[0];  in expand_es()
355 	struct ch	*pch;  in yylex()  local
360 		pch = po_getc();  in yylex()
362 		if (pch->eof) {  in yylex()
367 		if (pch->len > 1) {  in yylex()
369 			yylval.c.len = pch->len;  in yylex()
370 			(void) memcpy(yylval.c.buf, pch->buf, pch->len);  in yylex()
374 		switch (pch->buf[0]) {  in yylex()
385 			pch = po_getc();  in yylex()
386 			while (!pch->eof &&  in yylex()
387 				((pch->len != 1) || (pch->buf[0] != '\n'))) {  in yylex()
388 				if (buf_pos + pch->len + 1 > buf_size)  in yylex()
391 					pch->buf, pch->len);  in yylex()
392 				buf_pos += pch->len;  in yylex()
393 				pch = po_getc();  in yylex()
402 			return (pch->buf[0]);  in yylex()
410 				pch = po_getc();  in yylex()
412 				if (pch->eof) {  in yylex()
419 				if (pch->len == 1) {  in yylex()
420 					uc = pch->buf[0];  in yylex()
430 						pch = expand_es();  in yylex()
432 				if (buf_pos + pch->len + 1 > buf_size)  in yylex()
436 					pch->buf, pch->len);  in yylex()
437 				buf_pos += pch->len;  in yylex()
446 			uc = pch->buf[0];  in yylex()
453 				pch = po_getc();  in yylex()
454 				while (!pch->eof &&  in yylex()
455 					(pch->len == 1) &&  in yylex()
456 					(isalpha(uc = pch->buf[0]) ||  in yylex()
462 					pch = po_getc();  in yylex()
465 				po_ungetc(pch);  in yylex()
496 				pch = po_getc();  in yylex()
497 				while (!pch->eof &&  in yylex()
498 					(pch->len == 1) &&  in yylex()
499 					isdigit(uc = pch->buf[0])) {  in yylex()
504 					pch = po_getc();  in yylex()
507 				po_ungetc(pch);  in yylex()