Fix minor problem with Var.Set.print

types/var.ml

@@ -53,7 +53,7 @@ module Set = struct
     aux ppf (elements 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 from_list l = List.fold_left (fun acc x -> add x acc) empty l
 end