1*3e12c5d1SDavid du Colombier /* 2*3e12c5d1SDavid du Colombier * pANS stdio -- fopen 3*3e12c5d1SDavid du Colombier */ 4*3e12c5d1SDavid du Colombier #include "iolib.h" fopen(const char * name,const char * mode)5*3e12c5d1SDavid du ColombierFILE *fopen(const char *name, const char *mode){ 6*3e12c5d1SDavid du Colombier FILE *f; 7*3e12c5d1SDavid du Colombier for(f=_IO_stream;f!=&_IO_stream[FOPEN_MAX];f++) 8*3e12c5d1SDavid du Colombier if(f->state==CLOSED) 9*3e12c5d1SDavid du Colombier return freopen(name, mode, f); 10*3e12c5d1SDavid du Colombier return NULL; 11*3e12c5d1SDavid du Colombier } 12