/* $Header: /var/lib/cvsd/repos/CSRG/43BSD/contrib/mkmf/src/warns.c,v 1.1.1.1 2018/04/24 16:12:54 root Exp $ */

/*
 * Author: Peter J. Nicklin
 */

/*
 * warns() places an error message and a string argument on the
 * standard error output stream stderr.
 */
#include <stdio.h>
#include "null.h"

extern char *PGN;			/* program name */

warns(m, s)
	char *m;			/* warning message */
	char *s;			/* string argument */
{
	if (PGN != NULL && *PGN != '\0')
		fprintf(stderr, "%s: ", PGN);
	fprintf(stderr, m, s);
	fprintf(stderr, "\n");
}