瀏覽代碼

Revert "fix type equality check for ECheckType"

This reverts commit ed3c3a4307f78972f55f843b7700e2c65da00071.
Simon Krajewski 10 年之前
父節點
當前提交
2079a10814
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      typer.ml

+ 1 - 1
typer.ml

@@ -3573,7 +3573,7 @@ and type_expr ctx (e,p) (with_type:with_type) =
 		let t = Typeload.load_complex_type ctx p t in
 		let t = Typeload.load_complex_type ctx p t in
 		let e = type_expr ctx e (WithType t) in
 		let e = type_expr ctx e (WithType t) in
 		let e = Codegen.AbstractCast.cast_or_unify ctx t e p in
 		let e = Codegen.AbstractCast.cast_or_unify ctx t e p in
-		if type_iseq e.etype t then e else mk (TCast (e,None)) t p
+		if e.etype == t then e else mk (TCast (e,None)) t p
 	| EMeta (m,e1) ->
 	| EMeta (m,e1) ->
 		let old = ctx.meta in
 		let old = ctx.meta in
 		ctx.meta <- m :: ctx.meta;
 		ctx.meta <- m :: ctx.meta;