home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume25 / trash / part01 / warning.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-03-22  |  420 b   |  33 lines

  1. #include    <varargs.h>
  2. #include    <stdio.h>
  3.  
  4. extern char    *myname();
  5. extern void    format();
  6.  
  7. extern FILE    *outfp;
  8.  
  9. static
  10. int
  11. warning_putc(c)
  12. int    c;
  13. {
  14.     putc(c, outfp);
  15. }
  16.  
  17. /*
  18.  * "warning(printf_like_format, printf_like_arg, ...);"
  19.  */
  20. void
  21. warning(va_alist)
  22. va_dcl
  23. {
  24.     register char    *cp;
  25.     va_list        ap;
  26.  
  27.     fprintf(outfp, "%s: warning: ", myname());
  28.     va_start(ap);
  29.     format(warning_putc, &ap);
  30.     va_end(ap);
  31.     fprintf(outfp, ".\n");
  32. }
  33.