Return to fopen.c CVS log

Up to [MW Coherent from dump] / coherent / d / lib / libc / stdio

Annotation of coherent/d/lib/libc/stdio/fopen.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * Standard I/O Library
        !             3:  * open file with first available structure
        !             4:  */
        !             5: 
        !             6: #include <stdio.h>
        !             7: 
        !             8: FILE *
        !             9: fopen(name, type)
        !            10: char   *name, *type;
        !            11: {
        !            12:        register FILE   **fpp;
        !            13:        extern  FILE    *_fopen();
        !            14: 
        !            15:        for (fpp = &_fp[0]; fpp < &_fp[_NFILE]; fpp++)
        !            16:                if (*fpp==NULL || !((*fpp)->_ff&_FINUSE))
        !            17:                        return (*fpp = _fopen(name, type, *fpp, -1));
        !            18:        return (NULL);
        !            19: }

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