ack/lang/occam/comp/report.c

#include <system.h>

extern int err, yylineno;
extern char *curr_file;

report(fmt, arg1, arg2, arg3) char *fmt;
{
	fprint(STDERR, "%s (%d) F: ", curr_file, yylineno);
	fprint(STDERR, fmt, arg1, arg2, arg3);
	fprint(STDERR,"\n");
	err=1;
}

warning(fmt, arg1, arg2, arg3) char *fmt, *arg1;
{
	fprint(STDERR, "%s (%d) E: ", curr_file, yylineno);
	fprint(STDERR, fmt, arg1, arg2, arg3);
	fprint(STDERR,"\n");
}

fatal(fmt, arg1, arg2, arg3) char *fmt, *arg1;
{
	fprint(STDERR, "%s (%d) X: ", curr_file, yylineno);
	fprint(STDERR, fmt, arg1, arg2, arg3);
	fprint(STDERR,"\n");
	exit(1);
}