exception Http_error of (int * string) let get ?head_callback _ = assert false let get_iter ?head_callback _ _ = assert false let head _ = assert false