232 			struct ioword *iop = *ioact++;  in ptree()  local
235 			if ((iop->ioflag & (IOTYPE | IOHERESTR)) == IOHERE &&  in ptree()
236 			    iop->heredoc) {  in ptree()
238 				shf_puts(iop->heredoc, shf);  in ptree()
240 				    evalstr(iop->delim, 0));  in ptree()
257 pioact(struct shf *shf, struct ioword *iop)  in pioact()  argument
259 	unsigned short flag = iop->ioflag;  in pioact()
265 	    (type == IODUP && (iop->unit == !(flag & IORDUP))) ? iop->unit :  in pioact()
266 	    iop->unit + 1;  in pioact()
267 	if (iop->unit != expected)  in pioact()
268 		shf_fprintf(shf, Tf_d, (int)iop->unit);  in pioact()
298 		if (iop->delim && !(iop->ioflag & IONDELIM))  in pioact()
299 			wdvarput(shf, iop->delim, 0, WDS_TPUTS);  in pioact()
300 	} else if (iop->ioname) {  in pioact()
302 			print_value_quoted(shf, iop->ioname);  in pioact()
304 			wdvarput(shf, iop->ioname, 0, WDS_TPUTS);  in pioact()
752 	struct ioword **iop;  in iofree()  local
755 	iop = iow;  in iofree()
756 	while ((p = *iop++) != NULL) {  in iofree()
938 	struct ioword **ioact, *iop;  in dumpioact()  local
944 	while ((iop = *ioact++) != NULL) {  in dumpioact()
945 		unsigned short type = iop->ioflag & IOTYPE;  in dumpioact()
947 #define DB(x) if (iop->ioflag & x) shf_puts("|" #x, shf);  in dumpioact()
968 		shf_fprintf(shf, ",unit=%d", (int)iop->unit);  in dumpioact()
969 		if (iop->delim && !(iop->ioflag & IONDELIM)) {  in dumpioact()
971 			dumpwdvar(shf, iop->delim);  in dumpioact()
974 		if (iop->ioname) {  in dumpioact()
975 			if (iop->ioflag & IONAMEXP) {  in dumpioact()
977 				print_value_quoted(shf, iop->ioname);  in dumpioact()
980 				dumpwdvar(shf, iop->ioname);  in dumpioact()
984 		if (iop->heredoc) {  in dumpioact()
986 			print_value_quoted(shf, iop->heredoc);  in dumpioact()