Parse_with_comments (ocamlformat-lib.Ocamlformat_lib.Parse_with

type !'a with_comments = {

ast : 'a;
comments : Ocamlformat_lib.Cmt.t Ocamlformat_stdlib.list;
prefix : Ocamlformat_stdlib.string;
source : Ocamlformat_lib.Source.t;

}

module W : sig ... end

exception Warning50 of (Ocaml_common.Location.t * Ocaml_common.Warnings.t)
               Ocamlformat_stdlib.list

val parse : 
  ?disable_w50:Ocamlformat_stdlib.bool ->
  ?disable_deprecated:Ocamlformat_stdlib.bool ->
  ('b ->
    input_name:Ocamlformat_stdlib.string ->
    Ocamlformat_stdlib.string ->
    'a) ->
  'b ->
  Ocamlformat_lib.Conf.t ->
  input_name:Ocamlformat_stdlib.string ->
  source:Ocamlformat_stdlib.string ->
  'a with_comments

val parse_toplevel : 
  ?disable_w50:Ocamlformat_stdlib.bool ->
  ?disable_deprecated:Ocamlformat_stdlib.bool ->
  Ocamlformat_lib.Conf.t ->
  input_name:Ocamlformat_stdlib.string ->
  source:Ocamlformat_stdlib.string ->
  (Ocamlformat_lib.Extended_ast.use_file with_comments,
    Ocamlformat_lib.Extended_ast.repl_file with_comments)
    Ocamlformat_stdlib.Either.t

val parse_ast : 
  Ocamlformat_lib.Conf.t ->
  'a Ocamlformat_lib.Extended_ast.t ->
  input_name:Ocamlformat_stdlib.string ->
  Ocamlformat_stdlib.string ->
  'a