home *** CD-ROM | disk | FTP | other *** search
- /* $Header: warn2.c,v 1.1 85/04/01 17:20:41 nicklin Exp $ */
-
- /*
- * Author: Peter J. Nicklin
- */
-
- /*
- * warn2() places an error message and 2 string arguments on the
- * standard error output stream stderr.
- */
- #include <stdio.h>
- #include "null.h"
-
- extern char *PGN; /* program name */
-
- warn2(m, s1, s2)
- char *m; /* warning message */
- char *s1; /* string argument */
- char *s2; /* string argument */
- {
- if (PGN != NULL && *PGN != '\0')
- fprintf(stderr, "%s: ", PGN);
- fprintf(stderr, m, s1, s2);
- fprintf(stderr, "\n");
- }
-