1*3e12c5d1SDavid du Colombier /* 2*3e12c5d1SDavid du Colombier * pANS stdio -- sscanf 3*3e12c5d1SDavid du Colombier */ 4*3e12c5d1SDavid du Colombier #include "iolib.h" sscanf(const char * s,const char * fmt,...)5*3e12c5d1SDavid du Colombierint sscanf(const char *s, const char *fmt, ...){ 6*3e12c5d1SDavid du Colombier int n; 7*3e12c5d1SDavid du Colombier FILE *f=sopenr(s); 8*3e12c5d1SDavid du Colombier va_list args; 9*3e12c5d1SDavid du Colombier va_start(args, fmt); 10*3e12c5d1SDavid du Colombier n=vfscanf(f, fmt, args); 11*3e12c5d1SDavid du Colombier va_end(args); 12*3e12c5d1SDavid du Colombier sclose(f); 13*3e12c5d1SDavid du Colombier return n; 14*3e12c5d1SDavid du Colombier } 15