From 68409f8c498ae3c552c27501a48d9f4a7b705cd3 Mon Sep 17 00:00:00 2001
From: Dov Murik <dov.murik@gmail.com>
Date: Tue, 15 Dec 2015 12:47:36 -0500
Subject: [PATCH] ocaml: don't print commas in hash-maps

---
 ocaml/printer.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ocaml/printer.ml b/ocaml/printer.ml
index 135c3cee03..74a8c64502 100644
--- a/ocaml/printer.ml
+++ b/ocaml/printer.ml
@@ -31,7 +31,7 @@ let rec pr_str mal_obj print_readably =
       | T.Vector { T.value = xs } ->
           "[" ^ (String.concat " " (List.map (fun s -> pr_str s r) xs)) ^ "]"
       | T.Map { T.value = xs } ->
-         "{" ^ (Types.MalMap.fold (fun k v s -> s ^ (if s = "" then "" else ", ") ^ (pr_str k r)
+         "{" ^ (Types.MalMap.fold (fun k v s -> s ^ (if s = "" then "" else " ") ^ (pr_str k r)
                                                 ^ " " ^ (pr_str v r)) xs "")
          ^ "}"
       | T.Fn f -> "#<fn>"