Explorar o código

add all .hx files to Lexer cache to avoid string interpolation issues

Simon Krajewski %!s(int64=11) %!d(string=hai) anos
pai
achega
7a8e05942f
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      typer.ml

+ 1 - 1
typer.ml

@@ -339,7 +339,7 @@ let parse_string ctx s p inlined =
 		Lexer.restore old;
 		Lexer.restore old;
 		Parser.display_error := old_de
 		Parser.display_error := old_de
 	in
 	in
-	Lexer.init p.pfile false;
+	Lexer.init p.pfile (ExtString.String.ends_with p.pfile ".hx");
 	Parser.display_error := (fun e p -> raise (Parser.Error (e,p)));
 	Parser.display_error := (fun e p -> raise (Parser.Error (e,p)));
 	if not inlined then Parser.resume_display := null_pos;
 	if not inlined then Parser.resume_display := null_pos;
 	let _, decls = try
 	let _, decls = try