sig
  val label : ('a, string) Gobject.property
  val title : ('a, string) Gobject.property
  val use_underline : ('a, bool) Gobject.property
end