sig
  val printer : Stdlib.Format.formatter -> Rope.rope -> unit
  val max_display_length : int Stdlib.ref
  val ellipsis : string Stdlib.ref
end