浏览代码

use safer unification function for abstract eq op check

Simon Krajewski 4 月之前
父节点
当前提交
ff0dfed6ed
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      src/typing/operators.ml

+ 1 - 1
src/typing/operators.ml

@@ -451,7 +451,7 @@ let find_abstract_binop_overload ctx op e1 e2 a c tl left is_assign_op p =
 	let is_eq_op = match op with OpEq | OpNotEq -> true | _ -> false in
 	if is_eq_op then begin match follow e1.etype,follow e2.etype with
 		| TMono _,_ | _,TMono _ ->
-			Type.unify e1.etype e2.etype
+			unify ctx e1.etype e2.etype p
 		| _ ->
 			()
 	end;