ref: 3aeab1c91e6f2d8dd52fc29063f359a5c35c8901
dir: /sys/src/ape/lib/ap/stdio/sopenw.c/
/*
* pANS stdio -- sopenw
*/
#include "iolib.h"
FILE *_IO_sopenw(void){
FILE *f;
if((f=_IO_newfile())==NULL)
return NULL;
f->buf=f->rp=f->wp=0;
f->state=OPEN;
f->flags=STRING;
f->fd=-1;
return f;
}