|
|
1.1 ! root 1: /* $Header: warn2.c,v 1.1 85/04/01 17:20:41 nicklin Exp $ */ ! 2: ! 3: /* ! 4: * Author: Peter J. Nicklin ! 5: */ ! 6: ! 7: /* ! 8: * warn2() places an error message and 2 string arguments on the ! 9: * standard error output stream stderr. ! 10: */ ! 11: #include <stdio.h> ! 12: #include "null.h" ! 13: ! 14: extern char *PGN; /* program name */ ! 15: ! 16: warn2(m, s1, s2) ! 17: char *m; /* warning message */ ! 18: char *s1; /* string argument */ ! 19: char *s2; /* string argument */ ! 20: { ! 21: if (PGN != NULL && *PGN != '\0') ! 22: fprintf(stderr, "%s: ", PGN); ! 23: fprintf(stderr, m, s1, s2); ! 24: fprintf(stderr, "\n"); ! 25: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.