瀏覽代碼

do not use type_expr_with_type on $ identifiers (they are not valid enum ctors and there's a regression in neko.Reflect.deleteField)

Simon Krajewski 13 年之前
父節點
當前提交
a88d5368c1
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      typer.ml

+ 1 - 1
typer.ml

@@ -1410,7 +1410,7 @@ and type_expr_with_type_raise ctx e t =
 	| EParenthesis e ->
 		let e = type_expr_with_type_raise ctx e t in
 		mk (TParenthesis e) e.etype p;
-	| ECall (((EConst (Ident s),p) as e),el) ->
+	| ECall (((EConst (Ident s),p) as e),el) when s.[0] <> '$' ->
 		(try
 			ignore(type_ident_raise ~imported_enums:false ctx s p MGet);
 			type_call ctx e el t p