Return to findiop.c CVS log

Up to [Research Unix] / researchv10dc / libI77 / notused

Annotation of researchv10dc/libI77/notused/findiop.c, revision 1.1

1.1     ! root        1: /*     @(#)findiop.c   1.2     */
        !             2: /*     3.0 SID #       1.2     */
        !             3: /*LINTLIBRARY*/
        !             4: #include <stdio.h>
        !             5: 
        !             6: extern FILE *_lastbuf;
        !             7: 
        !             8: FILE *
        !             9: _findiop()
        !            10: {
        !            11:        register FILE *iop;
        !            12: 
        !            13:        for(iop = _iob; iop->_flag & (_IOREAD | _IOWRT | _IORW); iop++)
        !            14:                if(iop >= _lastbuf)
        !            15:                        return(NULL);
        !            16:        return(iop);
        !            17: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.