X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=error.c;h=4f65cc42c50abc9601a051d688b508d51a99553e;hb=5bea6621a5f369fdc9921965fc5f23571bb34715;hp=300a07e9daabcb3851381ea568e0fe5fa91701ba;hpb=b10167d55798ea184f97fafda075255c0852f3b6;p=rmac diff --git a/error.c b/error.c index 300a07e..4f65cc4 100644 --- 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; }