simon/sidekick
1
0
Fork 0
mirror of https://github.com/c-cube/sidekick.git synced 2025-12-06 11:15:43 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

debug

Browse source
This commit is contained in:
Simon Cruanes 2021-12-17 15:13:48 -05:00
parent 44c63d4c13
commit b19d80e443
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 9 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
src/smt-solver/Sidekick_smt_solver.ml
View file

@ -872,7 +872,15 @@ module Make(A : ARG)
Stat.incr self.count_solve; Stat.incr self.count_solve;
match r with match r with
| Sat_solver.Sat (module SAT) -> | Sat_solver.Sat (module SAT) ->
Log.debug 1 "sidekick.smt-solver: SAT"; Log.debug 1 "(sidekick.smt-solver: SAT)";
Log.debugf 50
(fun k->
let ppc out n =
Fmt.fprintf out "{@[class@ %a@]}" (Util.pp_iter N.pp) (N.iter_class n) in
k "(@[sidekick.smt-solver.classes@ (@[%a@])@])"
(Util.pp_iter ppc) (CC.all_classes @@ Solver_internal.cc self.si));
let _lits f = SAT.iter_trail f in let _lits f = SAT.iter_trail f in
(* TODO: theory combination *) (* TODO: theory combination *)
let m = mk_model self _lits in let m = mk_model self _lits in