#include extern FILE *_lastbuf; FILE * _findiop() { register FILE *iop; for(iop = _iob; iop->_flag & (_IOREAD | _IOWRT | _IORW); iop++) if(iop >= _lastbuf) return(NULL); return(iop); }