method request (request : http_request) =
    let sv = call_method sv "request" [request#sv] in
    new http_response sv