ref: 7c8031e2a4e397bcc2017f3b9e5770d7165c2d0b
dir: /sys/src/ape/lib/ap/stdio/fopen.c/
/*
* pANS stdio -- fopen
*/
#include "iolib.h"
FILE *fopen(const char *name, const char *mode){
FILE *f;
for(f=_IO_stream;f!=&_IO_stream[FOPEN_MAX];f++)
if(f->state==CLOSED)
return freopen(name, mode, f);
return NULL;
}