mirror of
https://github.com/c-cube/sidekick.git
synced 2026-01-23 09:56:40 -05:00
fix(mini-cc): handle not properly
This commit is contained in:
parent
be2bc6e0f6
commit
c9f0141591
1 changed files with 4 additions and 0 deletions
|
|
@ -210,6 +210,10 @@ module Make(A: ARG) = struct
|
|||
(fun k->k "(@[mini-cc.congruence-by-eq@ %a@ %a@])" Node.pp n Node.pp n2);
|
||||
self.combine <- (n,n2) :: self.combine;
|
||||
)
|
||||
| Some (Not u) when Node.equal u self.true_ ->
|
||||
self.combine <- (n,self.false_) :: self.combine
|
||||
| Some (Not u) when Node.equal u self.false_ ->
|
||||
self.combine <- (n,self.true_) :: self.combine
|
||||
| Some s ->
|
||||
Log.debugf 5 (fun k->k "(@[mini-cc.update-sig@ %a@])" Signature.pp s);
|
||||
match Sig_tbl.find self.sig_tbl s with
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue