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

diff --git a/error.c b/error.c
index 6945fc4..47cff9f 100644
--- a/error.c
+++ b/error.c
@@ -8,9 +8,20 @@
 
 #include "error.h"
 #include <stdarg.h>
-#include <token.h>
-#include "listing.h"
 #include "token.h"
+#include "listing.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);