Skip to content
Snippets Groups Projects
Commit 59225723 authored by Julien Signoles's avatar Julien Signoles
Browse files

[e-acsl] a little bit more permissive for preconditions

parent 78b39b31
No related branches found
No related tags found
No related merge requests found
......@@ -482,7 +482,7 @@ let convert_preconditions _only_behaviors env _funspec behaviors =
let convert_postconditions only_behaviors env behaviors =
let do_behavior p_acc b =
if List.mem b.b_name only_behaviors then begin
if only_behaviors = [] || List.mem b.b_name only_behaviors then begin
assert (b.b_assumes = []);
List.fold_left
(fun p_acc (t, p) ->
......
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