浏览代码

fixed small pb with multiple errors line number.

Nicolas Cannasse 19 年之前
父节点
当前提交
0418544027
共有 1 个文件被更改,包括 1 次插入0 次删除
  1. 1 0
      main.ml

+ 1 - 0
main.ml

@@ -66,6 +66,7 @@ let type_error e p =
 	has_error := true
 
 let parse_error e p =
+	Lexer.save_lines();
 	warn (Parser.error_msg e) p;
 	has_error := true