mirror of
https://github.com/c-cube/sidekick.git
synced 2025-12-07 11:45:41 -05:00
forgot to pop before assume
This commit is contained in:
parent
563e9027e1
commit
3e9c0d3a1e
1 changed files with 1 additions and 0 deletions
|
|
@ -1146,6 +1146,7 @@ module Make
|
|||
with Sat -> ()
|
||||
|
||||
let assume ?tag cnf =
|
||||
if env.base_level > 0 then pop_assumptions ();
|
||||
List.iter
|
||||
(fun l ->
|
||||
let atoms = List.rev_map atom l in
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue