Cmts (ocamlformat-lib.Ocamlformat

type t

val init : 
  'a Ocamlformat_lib.Extended_ast.t ->
  debug:Ocamlformat_stdlib.bool ->
  Ocamlformat_lib.Source.t ->
  'a ->
  Ocamlformat_lib.Cmt.t Ocamlformat_stdlib.list ->
  t

val relocate : 
  t ->
  src:Ocaml_common.Location.t ->
  before:Ocaml_common.Location.t ->
  after:Ocaml_common.Location.t ->
  Ocamlformat_stdlib.unit

val relocate_wrongfully_attached_cmts : 
  t ->
  Ocamlformat_lib.Source.t ->
  Ocamlformat_lib.Extended_ast.expression ->
  Ocamlformat_stdlib.unit

val fmt_before : 
  t ->
  Ocamlformat_lib.Conf.t ->
  fmt_code:Ocamlformat_lib.Fmt_odoc.fmt_code ->
  ?pro:Ocamlformat_lib.Fmt.t ->
  ?epi:Ocamlformat_lib.Fmt.t ->
  ?eol:Ocamlformat_lib.Fmt.t ->
  ?adj:Ocamlformat_lib.Fmt.t ->
  Ocaml_common.Location.t ->
  Ocamlformat_lib.Fmt.t

val fmt_after : 
  t ->
  Ocamlformat_lib.Conf.t ->
  fmt_code:Ocamlformat_lib.Fmt_odoc.fmt_code ->
  ?pro:Ocamlformat_lib.Fmt.t ->
  ?epi:Ocamlformat_lib.Fmt.t ->
  ?filter:(Ocamlformat_lib.Cmt.t -> Ocamlformat_stdlib.bool) ->
  Ocaml_common.Location.t ->
  Ocamlformat_lib.Fmt.t

val fmt_within : 
  t ->
  Ocamlformat_lib.Conf.t ->
  fmt_code:Ocamlformat_lib.Fmt_odoc.fmt_code ->
  ?pro:Ocamlformat_lib.Fmt.t ->
  ?epi:Ocamlformat_lib.Fmt.t ->
  Ocaml_common.Location.t ->
  Ocamlformat_lib.Fmt.t

module Toplevel : sig ... end

val drop_inside : t -> Ocaml_common.Location.t -> Ocamlformat_stdlib.unit

val drop_before : t -> Ocaml_common.Location.t -> t

val has_before : t -> Ocaml_common.Location.t -> Ocamlformat_stdlib.bool

val has_within : t -> Ocaml_common.Location.t -> Ocamlformat_stdlib.bool

val has_after : t -> Ocaml_common.Location.t -> Ocamlformat_stdlib.bool

val remaining_comments : t -> Ocamlformat_lib.Cmt.t Ocamlformat_stdlib.list

val remaining_locs : t -> Ocaml_common.Location.t Ocamlformat_stdlib.list

val remaining_before : 
  t ->
  Ocaml_common.Location.t ->
  Ocamlformat_lib.Cmt.t Ocamlformat_stdlib.list

type layout_cache_key =

| Arg of Parser_extended.Asttypes.arg_label * Parser_extended.Parsetree.expression
| Pattern of Parser_extended.Parsetree.pattern
| Expression of Parser_extended.Parsetree.expression

val preserve : 
  cache_key:layout_cache_key ->
  (Ocamlformat_stdlib.unit -> Ocamlformat_lib.Fmt.t) ->
  t ->
  Ocamlformat_stdlib.string

val is_docstring : 
  Ocamlformat_lib.Conf.t ->
  Ocamlformat_lib.Cmt.t ->
  (Ocamlformat_lib.Cmt.t, Ocamlformat_lib.Cmt.t) Ocamlformat_stdlib.Either.t