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