object
  method error :
    ?parent:GWindow.window_skel ->
    ('a, Format.formatter, unit) Pervasives.format -> 'a
  method full_protect :
    cancelable:bool ->
    ?parent:GWindow.window_skel -> (unit -> 'a) -> 'a option
  method protect :
    cancelable:bool -> ?parent:GWindow.window_skel -> (unit -> unit) -> unit
  method private set_reset : (unit -> unit) -> unit
end