external http_get_with_status : string -> (int * string) = "caml_js_http_get_with_status"