sig
  external call_parent : 'a -> string -> unit = "caml_js_call_parent"
  val log : string -> unit
  val undef : 'a
  val to_class_configs : < .. > Js.t -> Ext_Class.configs Js.t
  val alert : Js.js_string Js.t -> unit
  val setTimeout : (unit -> unit) -> int -> unit
  val get_global : string -> 'a
  val set_global : string -> 'a -> unit
  val test_global : string -> bool
end