Commit cb9436d5 authored by Pietro Abate's avatar Pietro Abate
Browse files

Fix minor problem with Var.Set.print

parent 46d53fe1
...@@ -53,7 +53,7 @@ module Set = struct ...@@ -53,7 +53,7 @@ module Set = struct
aux ppf (elements s) aux ppf (elements s)
let dump ppf s = aux_print ";" dump ppf s let dump ppf s = aux_print ";" dump ppf s
let print ppf s = aux_print ";" print ppf let print ppf s = aux_print ";" print ppf s
let is_empty s = equal s empty let is_empty s = equal s empty
let from_list l = List.fold_left (fun acc x -> add x acc) empty l let from_list l = List.fold_left (fun acc x -> add x acc) empty l
end end
......
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