Commit 8d4ec847 authored by Pietro Abate's avatar Pietro Abate
Browse files

Minor fix to ocamlinit

parent 2b579d64
...@@ -28,7 +28,7 @@ let mk_pp = function ...@@ -28,7 +28,7 @@ let mk_pp = function
let mk_prod l = let mk_prod l =
List.fold_left (fun acc2 c -> List.fold_left (fun acc2 c ->
Tallying.CS.prod (mk_pp c) acc2 Tallying.CS.prod Var.Set.empty (mk_pp c) acc2
) Tallying.CS.sat l ) Tallying.CS.sat l
let mk_union l1 l2 = let mk_union l1 l2 =
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment