mirror of
https://github.com/c-cube/sidekick.git
synced 2025-12-07 03:35:38 -05:00
refactor: a debug msg
This commit is contained in:
parent
91389d2b5e
commit
d95047b65a
1 changed files with 2 additions and 0 deletions
|
|
@ -589,6 +589,8 @@ let pop_levels (self:t) n : unit =
|
|||
Vec.iter (N.set_field N.field_is_pending false) self.pending;
|
||||
Vec.clear self.pending;
|
||||
Vec.clear self.combine;
|
||||
Log.debugf 15
|
||||
(fun k->k "(@[cc.pop-levels %d@ :n-lvls %d@])" n (Backtrack_stack.n_levels self.undo));
|
||||
Backtrack_stack.pop_levels self.undo n ~f:(fun f -> f());
|
||||
()
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue