X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=error.c;h=5c54592df6d5100ad3ad552a7fe7a261f95db180;hb=45c9dc23612600f6156009e2e9c0039a61b64ea2;hp=6945fc458e408afd476e6e4e3a6d307e28a98805;hpb=58c0626339e0d7f57818835b068c3d666dc82459;p=rmac

diff --git a/error.c b/error.c
index 6945fc4..5c54592 100644
--- a/error.c
+++ b/error.c
@@ -10,7 +10,18 @@
 #include <stdarg.h>
 #include <token.h>
 #include "listing.h"
-#include "token.h"
+char * interror_msg[] = {
+	"Unknown internal error",	// Error not referenced, should not be displayed
+	"Unknown internal error",	// Error not referenced, should not be displayed
+	"Bad MULTX entry in chrtab",				// Error #2
+	"Unknown internal error",	// Error not referenced, should not be displayed
+	"Bad fixup type",							// Error #4
+	"Bad operator in expression stream",		// Error #5
+	"Can't find generated code in section",		// Error #6
+	"Fixup (loc) out of range",					// Error #7
+	"Absolute top filename found",				// Error #8
+	"The RISC expression evaluator blew up, sorry" // Error #9
+};
 
 // Exported variables
 int errcnt;						// Error count
@@ -204,7 +215,7 @@ int interror(int n)
 	char buf[EBUFSIZ];
 
 	err_setup();
-	sprintf(buf, "%s %d: Internal error #%d\n", curfname, curlineno, n);
+	sprintf(buf, "%s %d: Internal error #%d: %s\n", curfname, curlineno, n, interror_msg[n]);
 
 	if (listing > 0)
 		ship_ln(buf);