sig
  val text_width : ('a, float) Gobject.property
  val text_height : ('a, float) Gobject.property
end