js_of_ocaml 2.8.4 · OCaml Package

js_of_ocaml

type readyState =

| UNSENT
| OPENED
| HEADERS_RECEIVED
| LOADING
| DONE

type !_ response =

| ArrayBuffer : Typed_array.arrayBuffer Js.t Js.Opt.t response
| Blob : File.blob Js.t Js.Opt.t response
| Document : Dom.element Dom.document Js.t Js.Opt.t response
| JSON : 'a Js.Opt.t response
| Text : Js.js_string Js.t response
| Default : string response

class type xmlHttpRequest = object ... end

class type xmlHttpRequestUpload = object ... end

val create : unit -> xmlHttpRequest Js.t

module Event : sig ... end

type !'response generic_http_frame = {

url : string;
code : int;
headers : string -> string option;
content : 'response;
content_xml : unit -> Dom.element Dom.document Js.t option;

}

type http_frame = string generic_http_frame

exception Wrong_headers of int * (string -> string option)

val perform_raw : 
  ?headers:(string * string) list ->
  ?content_type:string ->
  ?post_args:(string * Form.form_elt) list ->
  ?get_args:(string * string) list ->
  ?form_arg:Form.form_contents ->
  ?check_headers:(int -> (string -> string option) -> bool) ->
  ?progress:(int -> int -> unit) ->
  ?upload_progress:(int -> int -> unit) ->
  ?override_mime_type:string ->
  ?override_method:
    [< `DELETE | `GET | `HEAD | `OPTIONS | `PATCH | `POST | `PUT ] ->
  ?with_credentials:bool ->
  response_type:'a response ->
  string ->
  'a generic_http_frame Lwt.t

val perform_raw_url : 
  ?headers:(string * string) list ->
  ?content_type:string ->
  ?post_args:(string * Form.form_elt) list ->
  ?get_args:(string * string) list ->
  ?form_arg:Form.form_contents ->
  ?check_headers:(int -> (string -> string option) -> bool) ->
  ?progress:(int -> int -> unit) ->
  ?upload_progress:(int -> int -> unit) ->
  ?override_mime_type:string ->
  ?override_method:
    [< `DELETE | `GET | `HEAD | `OPTIONS | `PATCH | `POST | `PUT ] ->
  ?with_credentials:bool ->
  string ->
  http_frame Lwt.t

val perform : 
  ?headers:(string * string) list ->
  ?content_type:string ->
  ?post_args:(string * Form.form_elt) list ->
  ?get_args:(string * string) list ->
  ?form_arg:Form.form_contents ->
  ?check_headers:(int -> (string -> string option) -> bool) ->
  ?progress:(int -> int -> unit) ->
  ?upload_progress:(int -> int -> unit) ->
  ?override_mime_type:string ->
  ?override_method:
    [< `DELETE | `GET | `HEAD | `OPTIONS | `PATCH | `POST | `PUT ] ->
  ?with_credentials:bool ->
  Url.url ->
  http_frame Lwt.t

val get : string -> http_frame Lwt.t

package js_of_ocaml