فهرست منبع

[java/cs] minor - use memq when comparing classes

Cauê Waneck 11 سال پیش
والد
کامیت
fcc2de6a96
1فایلهای تغییر یافته به همراه1 افزوده شده و 1 حذف شده
  1. 1 1
      gencommon.ml

+ 1 - 1
gencommon.ml

@@ -3027,7 +3027,7 @@ struct
 						| TInst(c,_) -> c
 						| _ -> assert false) cf.cf_params
 					in
-					List.filter (fun t -> not (List.mem t params)) (get_type_params acc cf.cf_type)
+					List.filter (fun t -> not (List.memq t params)) (get_type_params acc cf.cf_type)
 				) a.a_fields acc
 			| TType(_, [])
 			| TAbstract (_, [])