summaryrefslogtreecommitdiff
path: root/lib/cSet.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/cSet.ml')
-rw-r--r--lib/cSet.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/cSet.ml b/lib/cSet.ml
index 3eeff29f..037cdc35 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