Better explanation on what is happening

tarides · Jan 27, 2023 · 39cb064 · 39cb064
1 parent a2fea8b
commit 39cb064
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/lib/pull.ml b/lib/pull.ml
@@ -34,7 +34,9 @@ let preprocess_dune dfp ~keep ~renames dune_file =
       | false -> Ok None
       | true -> Ok (Some (stanzas, renames)))
 
-(* can't use Sexplib pretty printer because it tries to hard to escape values like \ *)
+(* can't use Sexplib pretty printer here because Sexplib tries too hard
+   to escape values like \ and thus generates dune files that dune can't
+   read *)
 let rec pp_sexp ppf = function
   | Sexplib0.Sexp.List items ->
       let pp_items = Fmt.list ~sep:(Fmt.any " ") pp_sexp in