浏览代码

do not mute types when checking abstract casts

Simon Krajewski 12 年之前
父节点
当前提交
56a65b2ad8
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      codegen.ml

+ 1 - 1
codegen.ml

@@ -1395,7 +1395,7 @@ module Abstract = struct
 		| Some { eexpr = TFunction fd } when cf.cf_kind = Method MethInline ->
 			let config = if Meta.has Meta.Impl cf.cf_meta then (Some (a.a_types <> [] || cf.cf_params <> [], map)) else None in
 			(match Optimizer.type_inline ctx cf fd ethis args t config p true with
-				| Some e -> (match e.eexpr with TCast(e,None) -> e | _ -> e)
+				| Some e -> e
 				| None -> def())
 		| _ ->
 			def()