Skip to content
Snippets Groups Projects
Commit e30f8679 authored by Loïc Correnson's avatar Loïc Correnson
Browse files

[wp] linting

parent 91c4f65f
No related branches found
No related tags found
No related merge requests found
......@@ -207,9 +207,9 @@ struct
begin fun () ->
List.iter
(fun (l : LogicUsage.logic_lemma) ->
if Logic_utils.verify_predicate l.lem_predicate.tp_kind then
let wpo = VCG.compile_lemma l in
collection := Bag.add wpo !collection
if Logic_utils.verify_predicate l.lem_predicate.tp_kind then
let wpo = VCG.compile_lemma l in
collection := Bag.add wpo !collection
) pool.lemmas ;
end () ;
KFmap.iter
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment