source: buchla-68k/libcio/fprintf.c@ bfc0072

Last change on this file since bfc0072 was bfc0072, checked in by Thomas Lopatic <thomas@…>, 6 years ago

varargs.h -> stdarg.h.

  • Property mode set to 100644
File size: 638 bytes
Line 
1/*
2 =============================================================================
3 fprintf.c -- fprintf function
4 Version 2 -- 1987-06-26 -- D.N. Lynx Crowe
5 =============================================================================
6*/
7
8#include "stdio.h"
9#include "stddefs.h"
10#include "stdarg.h"
11
12static FILE *Stream;
13
14extern int _dofmt();
15extern int aputc();
16
17static int fpsub();
18
19int fprintf(FILE *stream, char *fmt, ...)
20{
21 register int count;
22 va_list aptr;
23
24 Stream = stream;
25 va_start(aptr, fmt);
26 count = _dofmt(fpsub, fmt, aptr);
27 va_end(aptr);
28 return(count);
29}
30
31static
32int
33fpsub(c)
34int c;
35{
36 return(aputc(c, Stream));
37}
Note: See TracBrowser for help on using the repository browser.