浏览代码

Update src/typing/typeloadFields.ml

Dan Korostelev 4 年之前
父节点
当前提交
70420e9f99
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      src/typing/typeloadFields.ml

+ 1 - 1
src/typing/typeloadFields.ml

@@ -1078,7 +1078,7 @@ let check_abstract (ctx,cctx,fctx) c cf fd t ret p =
 							delay ctx PCheckConstraint (fun () ->
 								match follow tr with
 								| TAbstract ({ a_path = [],"Bool" },_) -> ()
-								| _ -> error "`is` overloads must return Bool" cf.cf_pos
+								| _ -> error "`is` overload must return Bool" cf.cf_pos
 							);
 							a.a_is <- Some (t,cf);
 						| _ ->