external alert : string -> unit = "caml_js_alert"