mirror of
https://github.com/c-cube/sidekick.git
synced 2025-12-06 11:15:43 -05:00
fix bug in proof emission
This commit is contained in:
parent
84f7a39423
commit
a871192c5e
1 changed files with 1 additions and 0 deletions
|
|
@ -191,6 +191,7 @@ let rec emit_term_ (self:t) (t:Term.t) : term_id =
|
||||||
in
|
in
|
||||||
|
|
||||||
let id = alloc_id self in
|
let id = alloc_id self in
|
||||||
|
Term.Tbl.add self.map_term t id;
|
||||||
emit_step_ self {id; view};
|
emit_step_ self {id; view};
|
||||||
id
|
id
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue