diff options
| author | Pierre-Marie Pédrot | 2016-03-30 11:15:40 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2016-03-30 11:18:41 +0200 |
| commit | 5b412e9968d93f6f52ed738fd01a74e7021d1dd4 (patch) | |
| tree | 61190a49e43a750a4147b2b748ae78fb0e21374b /lib/cSet.ml | |
| parent | d670c6b6ceab80f1c3b6b74ffb53579670c0e621 (diff) | |
| parent | dc36fd7fe118136277d8dc525c528fef38b46d70 (diff) | |
Merge branch 'v8.5'
Diffstat (limited to 'lib/cSet.ml')
| -rw-r--r-- | lib/cSet.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/cSet.ml b/lib/cSet.ml index 3eeff29fe1..037cdc3568 100644 --- a/lib/cSet.ml +++ b/lib/cSet.ml @@ -57,7 +57,7 @@ struct open Hashset.Combine type t = set type u = M.t -> M.t - let equal s1 s2 = s1 == s2 || eqeq (spine s1 []) (spine s2 []) + let eq s1 s2 = s1 == s2 || eqeq (spine s1 []) (spine s2 []) let hash s = Set.fold (fun v accu -> combine (H.hash v) accu) s 0 let hashcons = umap end |