diff options
-rw-r--r-- | parser.y | 7 | ||||
-rw-r--r-- | y.tab.c.shipped | 7 |
2 files changed, 10 insertions, 4 deletions
@@ -2121,8 +2121,11 @@ int parse(parser_t *parser, val name, enum prime_parser prim) if (parser->errors && parser->syntax_tree == nil && parser->lineno != start_line) { - yyerrorf(parser->scanner, lit("while parsing form starting at line ~a"), - num(start_line), nao); + cnum curline = parser->lineno; + parser->lineno = start_line; + yyerrorf(parser->scanner, + lit("while parsing expression starting on this line"), nao); + parser->lineno = curline; } return res; diff --git a/y.tab.c.shipped b/y.tab.c.shipped index 7e5e647e..1b27eb7a 100644 --- a/y.tab.c.shipped +++ b/y.tab.c.shipped @@ -7498,8 +7498,11 @@ int parse(parser_t *parser, val name, enum prime_parser prim) if (parser->errors && parser->syntax_tree == nil && parser->lineno != start_line) { - yyerrorf(parser->scanner, lit("while parsing form starting at line ~a"), - num(start_line), nao); + cnum curline = parser->lineno; + parser->lineno = start_line; + yyerrorf(parser->scanner, + lit("while parsing expression starting on this line"), nao); + parser->lineno = curline; } return res; |