sig
  type diffs = Odiff.diffs
  val display_diffs :
    ?on_close:(unit -> unit) ->
    title:string -> file:string -> Ocamlcvs.Diffs.diffs -> unit
  val manual_merge : title:string -> file:string -> unit
end