Fixed subtle bug in expr().
[rmac] / error.c
diff --git a/error.c b/error.c
index 300a07e9daabcb3851381ea568e0fe5fa91701ba..4f65cc42c50abc9601a051d688b508d51a99553e 100644 (file)
--- a/error.c
+++ b/error.c
@@ -22,8 +22,14 @@ static long unused;                          // For supressing 'write' warnings
 //
 int at_eol(void)
 {
+       char msg[256];
+
        if (*tok != EOL)
-               error("syntax error");
+       {
+//             error("syntax error");
+               sprintf(msg, "syntax error. expected EOL, found $%X ('%c')", *tok, *tok);
+               error(msg);
+       }
 
        return 0;
 }