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

small style change

Browse source
This commit is contained in:
Simon Cruanes 2019-02-09 16:17:15 -06:00
parent 9d90b7ef66
commit 431d8fe4ac
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/smtlib/Process.ml
View file

@ -236,7 +236,8 @@ let check_smt_model (solver:Solver.Sat_solver.t) (hyps:_ Vec.t) (m:Model.t) : un
S.Atom.pp a b Msat.pp_lbool sat_value S.Atom.pp a b Msat.pp_lbool sat_value
) else ( ) else (
Log.debugf 5 Log.debugf 5
(fun k->k "(@[check-model@ :atom %a@ :model-val %B@ :no-sat-val@])" S.Atom.pp a b); (fun k->k "(@[check-model@ :atom %a@ :model-val %B@ :sat-val %a@])"
S.Atom.pp a b Msat.pp_lbool sat_value);
) )
| Some v -> | Some v ->
Error.errorf "(@[check-model.error@ :atom %a@ :non-bool-value %a@])" Error.errorf "(@[check-model.error@ :atom %a@ :non-bool-value %a@])"