1987-03-31 10:45:53 +00:00
|
|
|
/* $Header$ */
|
1987-01-27 15:57:55 +00:00
|
|
|
#include <stdio.h>
|
1988-04-15 14:43:19 +00:00
|
|
|
#include <varargs.h>
|
1987-01-27 15:57:55 +00:00
|
|
|
|
1988-04-15 14:43:19 +00:00
|
|
|
int fscanf(va_alist)
|
|
|
|
|
va_dcl
|
1987-01-27 15:57:55 +00:00
|
|
|
{
|
1988-04-15 14:43:19 +00:00
|
|
|
FILE *fp;
|
|
|
|
|
char *format;
|
|
|
|
|
va_list ap;
|
|
|
|
|
int retval;
|
|
|
|
|
|
|
|
|
|
va_start(ap);
|
|
|
|
|
fp = va_arg(ap, FILE *);
|
|
|
|
|
format = va_arg(ap, char *);
|
|
|
|
|
retval = _doscanf (fp, format, ap);
|
|
|
|
|
va_end(ap);
|
|
|
|
|
return retval;
|
1987-01-27 15:57:55 +00:00
|
|
|
}
|
|
|
|
|
|
