diff options
-rw-r--r-- | parser.y | 5 |
1 files changed, 4 insertions, 1 deletions
@@ -1908,9 +1908,12 @@ int parse(parser_t *parser, val name, enum prime_parser prim) uw_catch_end; - if (parser->errors && parser->syntax_tree == nil && start_line != 1) + 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); + } return res; } |