221 			struct ioword *iop = *ioact++;  in ptree()  local
224 			if ((iop->ioflag & (IOTYPE | IOHERESTR)) == IOHERE &&  in ptree()
225 			    iop->heredoc) {  in ptree()
227 				shf_puts(iop->heredoc, shf);  in ptree()
229 				    evalstr(iop->delim, 0));  in ptree()
246 pioact(struct shf *shf, struct ioword *iop)  in pioact()  argument
248 	unsigned short flag = iop->ioflag;  in pioact()
254 	    (type == IODUP && (iop->unit == !(flag & IORDUP))) ? iop->unit :  in pioact()
255 	    iop->unit + 1;  in pioact()
256 	if (iop->unit != expected)  in pioact()
257 		shf_fprintf(shf, "%d", (int)iop->unit);  in pioact()
287 		if (iop->delim && !(iop->ioflag & IONDELIM))  in pioact()
288 			wdvarput(shf, iop->delim, 0, WDS_TPUTS);  in pioact()
289 	} else if (iop->ioname) {  in pioact()
291 			print_value_quoted(shf, iop->ioname);  in pioact()
293 			wdvarput(shf, iop->ioname, 0, WDS_TPUTS);  in pioact()
725 	struct ioword **iop;  in iofree()  local
728 	iop = iow;  in iofree()
729 	while ((p = *iop++) != NULL) {  in iofree()
904 	struct ioword **ioact, *iop;  in dumpioact()  local
910 	while ((iop = *ioact++) != NULL) {  in dumpioact()
911 		unsigned short type = iop->ioflag & IOTYPE;  in dumpioact()
913 #define DB(x) if (iop->ioflag & x) shf_puts("|" #x, shf);  in dumpioact()
934 		shf_fprintf(shf, ",unit=%d", (int)iop->unit);  in dumpioact()
935 		if (iop->delim && !(iop->ioflag & IONDELIM)) {  in dumpioact()
937 			dumpwdvar(shf, iop->delim);  in dumpioact()
940 		if (iop->ioname) {  in dumpioact()
941 			if (iop->ioflag & IONAMEXP) {  in dumpioact()
943 				print_value_quoted(shf, iop->ioname);  in dumpioact()
946 				dumpwdvar(shf, iop->ioname);  in dumpioact()
950 		if (iop->heredoc) {  in dumpioact()
952 			print_value_quoted(shf, iop->heredoc);  in dumpioact()