#include <ncbi.h>
#include <dfa.h>

/*************************************************************************
 * dfa_perror(s)
 *
 *	Print a short error message describing the last error encountered
 *	when processing a DFA.
 *************************************************************************/
DFA_Error _cdecl
dfa_perror(s)
	CharPtr	s;
{
	char	buf[256];
	char *str;

	fflush(stdout);
	fflush(stderr);

	str = dfa_errstr(dfaerrno);

	if (s != NULL && *s != '\0') {
		strncpy(buf, s, sizeof(buf)-1);
		buf[sizeof(buf)-1] = NULLB;
		fprintf(stderr, "%s: %s", buf, str);
	}
	else
		fprintf(stderr, "%s", str);
	return dfaErrNone;
}