20 lines
295 B
C
20 lines
295 B
C
/* $Header$ */
|
|
#include <stdio.h>
|
|
#include <varargs.h>
|
|
|
|
fprintf(va_alist)
|
|
va_dcl
|
|
{
|
|
FILE *file;
|
|
char *fmt;
|
|
va_list ap;
|
|
|
|
va_start(ap);
|
|
file = va_arg(ap, FILE *);
|
|
fmt = va_arg(ap, char *);
|
|
_doprnt (fmt, ap, file);
|
|
if ( io_testflag(file,IO_PERPRINTF) )
|
|
fflush(file);
|
|
va_end(ap);
|
|
}
|