sig class request : Pervasives.in_channel -> Http_types.request end