Macintosh-SW/mpw
1
0
Fork 0
mirror of https://github.com/ksherlock/mpw.git synced 2025-01-09 13:30:34 +00:00
Code Issues Projects Releases Wiki Activity

clean up lexer errors a little more

Browse Source
This commit is contained in:
Kelvin Sherlock 2014-12-31 17:42:18 -05:00
parent b707e02295
commit 5aa9f08870
1 changed files with 14 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
bin/lexer.rl
View File

@ -381,13 +381,21 @@ bool ParseLine(const char *iter, Command *command)
%% write exec;
if (cs < lexer_first_final /* == lexer_error */)
if (cs == lexer_error || cs < lexer_first_final)
{
putchar(' '); putchar(' '); // 2 leading spaces.
for (size_t i = 0, l = p - iter; i < l; ++i) putchar(' '); puts("^");
if (*p == 0) fprintf(stderr, "Unexpected end of line\n");
else fprintf(stderr, "unexpected character: `%c'\n", *p);
if (p == eof)
{
fprintf(stderr, "Unexpected end of line\n");
}
else
{
for (size_t i = 0, l = 2 + (p - iter); i < l; ++i)
fputc(' ', stderr);
fprintf(stderr, "^\nunexpected character: `%c'\n", *p);
}
ParseFree(parser, free);
return false;
}