Sourcetype request = {meth : string;target : string;
} Sourceval post :
host:string ->
content_type:string ->
body:string ->
string ->
request Sourcetype response = {version : string;status : int;reason : string;body : string;
} Sourceval parse_status_line : string -> (string * int * string, string) result Sourceval is_redirect : int -> bool Sourcetype parsed_request = | Incomplete| Bad of string| Request of request * string * int
Sourceval reason : int -> string