249 pioact(struct shf *shf, struct ioword *iop)  in pioact()  argument
251 	unsigned short flag = iop->ioflag;  in pioact()
257 	    (type == IODUP && (iop->unit == !(flag & IORDUP))) ? iop->unit :  in pioact()
258 	    iop->unit + 1;  in pioact()
259 	if (iop->unit != expected)  in pioact()
260 		shf_fprintf(shf, Tf_d, (int)iop->unit);  in pioact()
274 		if (iop->heredoc /* nil when tracing */) {  in pioact()
282 			shf_puts(iop->heredoc, &ptree_heredoc);  in pioact()
284 			shf_puts(evalstr(iop->delim, 0), &ptree_heredoc);  in pioact()
288 		if (iop->delim && !(iop->ioflag & IONDELIM))  in pioact()
289 			wdvarput(shf, iop->delim, 0, WDS_TPUTS);  in pioact()
307 	if (iop->ioname) {  in pioact()
309 			print_value_quoted(shf, iop->ioname);  in pioact()
311 			wdvarput(shf, iop->ioname, 0, WDS_TPUTS);  in pioact()
758 	struct ioword **iop;  in iofree()  local
761 	iop = iow;  in iofree()
762 	while ((p = *iop++) != NULL) {  in iofree()
944 	struct ioword **ioact, *iop;  in dumpioact()  local
950 	while ((iop = *ioact++) != NULL) {  in dumpioact()
951 		unsigned short type = iop->ioflag & IOTYPE;  in dumpioact()
953 #define DB(x) if (iop->ioflag & x) shf_puts("|" #x, shf);  in dumpioact()
974 		shf_fprintf(shf, ",unit=%d", (int)iop->unit);  in dumpioact()
975 		if (iop->delim && !(iop->ioflag & IONDELIM)) {  in dumpioact()
977 			dumpwdvar(shf, iop->delim);  in dumpioact()
980 		if (iop->ioname) {  in dumpioact()
981 			if (iop->ioflag & IONAMEXP) {  in dumpioact()
983 				print_value_quoted(shf, iop->ioname);  in dumpioact()
986 				dumpwdvar(shf, iop->ioname);  in dumpioact()
990 		if (iop->heredoc) {  in dumpioact()
992 			print_value_quoted(shf, iop->heredoc);  in dumpioact()