try to fix build

This commit is contained in:
Simon Cruanes 2020-12-22 11:06:59 -05:00
parent 3b3a2e1caf
commit 5ca4730968

View file

@ -667,7 +667,7 @@ module Make_inner
let pp_pair =
within "(" ")" @@ hvbox @@ pair ~sep:(return "@ := ") Var.pp Erat.pp
in
map Var_map.to_seq @@ within "(" ")" @@ hvbox @@ seq pp_pair
map Var_map.to_iter @@ within "(" ")" @@ hvbox @@ iter pp_pair
let pp_bounds =
let open Format in