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

Allow level 0 semantic propagations

Browse source
This commit is contained in:
Guillaume Bury 2016-11-25 15:16:10 +01:00
parent 64694b524d
commit 2e7e947b62
1 changed files with 0 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
src/core/internal.ml
View file

@ -502,7 +502,6 @@ module Make
let l = List.map St.add_term terms in let l = List.map St.add_term terms in
let lvl = List.fold_left (fun acc {l_level; _} -> let lvl = List.fold_left (fun acc {l_level; _} ->
assert (l_level > 0); max acc l_level) 0 l in assert (l_level > 0); max acc l_level) 0 l in
assert (lvl > 0);
Iheap.grow_to_at_least env.order (St.nb_elt ()); Iheap.grow_to_at_least env.order (St.nb_elt ());
enqueue_bool a lvl Semantic enqueue_bool a lvl Semantic