sig   val on : 'a option -> ('-> unit) -> unit   val fire : ('-> unit) list -> '-> unit   val once : ('-> 'b) -> '-> 'b   val share : string Pervasives.ref   val flush : (string -> unit) Pervasives.ref   val warning : ('a, Format.formatter, unit) Pervasives.format -> 'a   val set_enabled : #GObj.widget -> bool -> unit   val set_visible : #GObj.widget -> bool -> unit   val set_tooltip : #GObj.widget -> string option -> unit   val set_small_font : #GObj.widget -> unit   val set_bold_font : #GObj.widget -> unit   val to_utf8 : string -> string   val later : (unit -> unit) -> unit   class virtual ['a] handler :     object       method virtual connect : ('-> unit) -> unit       method on_check : '-> (bool -> unit) -> unit       method on_event : (unit -> unit) -> unit       method on_value : '-> (unit -> unit) -> unit     end   class ['a] signal :     object       method connect : ('-> unit) -> unit       method fire : '-> unit       method lock : (unit -> unit) -> unit       method on_check : '-> (bool -> unit) -> unit       method on_event : (unit -> unit) -> unit       method on_value : '-> (unit -> unit) -> unit       method set_enabled : bool -> unit     end   class ['a] selector :     '->     object       method connect : ('-> unit) -> unit       method fire : '-> unit       method get : 'a       method lock : (unit -> unit) -> unit       method on_check : '-> (bool -> unit) -> unit       method on_event : (unit -> unit) -> unit       method on_value : '-> (unit -> unit) -> unit       method send : ('-> unit) -> unit -> unit       method set : '-> unit       method set_enabled : bool -> unit     end   class type widget =     object       method coerce : GObj.widget       method set_enabled : bool -> unit       method set_visible : bool -> unit       method widget : Wutil.widget     end   class layout :     object       method coerce : GObj.widget       method populate : #Wutil.widget -> unit       method set_enabled : bool -> unit       method set_visible : bool -> unit       method widget : widget     end   class gobj_widget : #GObj.widget -> widget   class gobj_action :     #GObj.widget ->     object       method coerce : GObj.widget       method set_enabled : bool -> unit       method set_tooltip : string -> unit       method set_visible : bool -> unit       method widget : widget     end end