Source

spotxtras / xcurl.mli

val ok200 : int * 'a -> [> `Ok of 'a | `Error of [> `Http of int * 'a ]]
(** HTTP result to a result monad *)

val get_string : 
  (Curl.handle -> unit) 
  -> [> `Error of [> `Http of int * string 
                  |  `Curl of int * string ]
     | `Ok of string ]
(** Get string *)

val download : 
  string 
  -> (Curl.handle -> unit) 
  -> [> `Error of [> `Http of int * string 
                  |  `Curl of int * string ]
     | `Ok of string ]
(** Download file. Return the final downloaded file path.
    At error, the tmp file is not removed since it may contain error message. 
*)