diff options
Diffstat (limited to 'lib/hashset.ml')
| -rw-r--r-- | lib/hashset.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/hashset.ml b/lib/hashset.ml index 9454aef9bb..1ca6cc6418 100644 --- a/lib/hashset.ml +++ b/lib/hashset.ml @@ -16,7 +16,7 @@ module type EqType = sig type t - val eq : t -> t -> bool + val equal : t -> t -> bool end type statistics = { @@ -183,7 +183,7 @@ module Make (E : EqType) = if i >= sz then ifnotfound index else if h = hashes.(i) then begin match Weak.get bucket i with - | Some v when E.eq v d -> v + | Some v when E.equal v d -> v | _ -> loop (i + 1) end else loop (i + 1) in |