sig
  type font_map
  module FontMap :
    sig
      val new_ : unit -> Pango_cairo.font_map
      val get_default : unit -> Pango_cairo.font_map
      val create_context : Pango_cairo.font_map -> Pango.context
    end
  val update_context : Cairo.t -> Pango.context -> unit
  val create_layout : Cairo.t -> Pango.layout
  val update_layout : Cairo.t -> Pango.layout -> unit
  val show_layout : Cairo.t -> Pango.layout -> unit
end