mirror of
https://github.com/c-cube/sidekick.git
synced 2026-01-24 02:16:41 -05:00
fix
This commit is contained in:
parent
e9931b377c
commit
7a74ec45b7
1 changed files with 1 additions and 1 deletions
|
|
@ -59,7 +59,7 @@ module Make (A: CC_ARG)
|
|||
let[@inline] set field b x =
|
||||
if b then x lor field else x land (lnot field)
|
||||
let merge = (lor)
|
||||
let equal : t -> t -> bool = Pervasives.(=)
|
||||
let equal : t -> t -> bool = CCEqual.poly
|
||||
end
|
||||
|
||||
(** A node of the congruence closure.
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue