object
  method _get_location : Dom.location
  method _set_onbeforeunload : (unit -> string) -> unit
  method _set_onload : (unit -> unit) -> unit
  method alert : string -> unit
  method clearInterval : Dom.interval_id -> unit
  method clearTimeout : Dom.timeout_id -> unit
  method confirm : string -> bool
  method setInterval : (unit -> unit) -> float -> Dom.interval_id
  method setTimeout : (unit -> unit) -> float -> Dom.timeout_id
end