jon.recoil.org
this repo has no description
ocamlformat: fix duplication of docstrings
-9
worker/ocamlfmt.ml
-9
worker/ocamlfmt.ml
···
22
22
23
23
let fmt source =
24
24
let ast = ast source in
25
-
let ast =
26
-
let ghostify =
27
-
{
28
-
Parser_extended.Ast_mapper.default_mapper with
29
-
location = (fun _ loc -> { loc with loc_ghost = true });
30
-
}
31
-
in
32
-
{ ast with ast = ghostify.structure ghostify ast.ast }
33
-
in
34
25
let with_buffer_formatter ~buffer_size k =
35
26
let buffer = Buffer.create buffer_size in
36
27
let fs = Format_.formatter_of_buffer buffer in