Initial revision

util/cpp/error.c

@@ -0,0 +1,59 @@
+/*	E R R O R   A N D  D I A G N O S T I C   R O U T I N E S	*/
+
+#include	<system.h>
+
+#include	"errout.h"
+#include	"LLlex.h"
+
+/*	This file contains the (non-portable) error-message and diagnostic
+	functions.  Beware, they are called with a variable number of
+	arguments!
+*/
+
+int err_occurred;
+
+err_hdr(s)
+	char *s;
+{
+	fprint(ERROUT, "\"%s\", line %d: %s", FileName, LineNumber, s);
+}
+
+/*VARARGS1*/
+error(fmt, args)
+	char *fmt;
+{
+	err_hdr("");
+	doprnt(ERROUT, fmt, &args);
+	fprint(ERROUT, "\n");
+}
+
+/*VARARGS1*/
+warning(fmt, args)
+	char *fmt;
+{
+	err_hdr("warning ");
+	doprnt(ERROUT, fmt, &args);
+	fprint(ERROUT, "\n");
+}
+
+/*VARARGS1*/
+crash(fmt, args)
+	char *fmt;
+	int args;
+{
+	err_hdr("crash ");
+	doprnt(ERROUT, fmt, &args);
+	fprint(ERROUT, "\n");
+	sys_stop(S_ABORT);
+}
+
+/*VARARGS1*/
+fatal(fmt, args)
+	char *fmt;
+	int args;
+{
+	err_hdr("fatal ");
+	doprnt(ERROUT, fmt, &args);
+	fprint(ERROUT, "\n");
+	sys_stop(S_EXIT);
+}