module Make(Http : S.Http) : S.Message