Fixed a nasty bug that dropped symbols that shouldn't have been.

[rmac] / error.c

diff --git a/error.c b/error.c
index 300a07e9daabcb3851381ea568e0fe5fa91701ba..75efaadfa50c0077e705555e7be6ccdcaf9415d9 100644 (file)
--- a/error.c
+++ b/error.c
@@ -22,15 +22,20 @@ static long unused;                         // For supressing 'write' warnings
 //
 int at_eol(void)
 {
+       char msg[256];
+
        if (*tok != EOL)
-               error("syntax error");
+       {
+               sprintf(msg, "syntax error. expected EOL, found $%X ('%c')", *tok, *tok);
+               error(msg);
+       }
 
        return 0;
 }
 
 
 //
-// Cannot Create a File
+// Cannot create a file
 //
 void cantcreat(const char * fn)
 {
@@ -40,7 +45,7 @@ void cantcreat(const char * fn)
 
 
 //
-// Setup for Error Message
+// Setup for error message
 // o  Create error listing file (if necessary)
 // o  Set current filename
 //
@@ -70,7 +75,7 @@ void err_setup(void)
 
 
 //
-// Display Error Message
+// Display error message
 //
 int error(const char * s)
 {