simon/sidekick
1
0
Fork 0
mirror of https://github.com/c-cube/sidekick.git synced 2026-01-28 20:34:53 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix(mini-cc): handle not properly

Browse source
This commit is contained in:
Simon Cruanes 2019-10-30 15:00:57 -05:00
parent be2bc6e0f6
commit c9f0141591
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/mini-cc/Sidekick_mini_cc.ml
View file

@ -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); (fun k->k "(@[mini-cc.congruence-by-eq@ %a@ %a@])" Node.pp n Node.pp n2);
self.combine <- (n,n2) :: self.combine; 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 -> | Some s ->
Log.debugf 5 (fun k->k "(@[mini-cc.update-sig@ %a@])" Signature.pp s); Log.debugf 5 (fun k->k "(@[mini-cc.update-sig@ %a@])" Signature.pp s);
match Sig_tbl.find self.sig_tbl s with match Sig_tbl.find self.sig_tbl s with