sig
  val text_popped : ([> `statusbar ], int -> string -> unit) GtkSignal.t
  val text_pushed : ([> `statusbar ], int -> string -> unit) GtkSignal.t
end