let main port () : unit Deferred.t =
  let implementations = [
    Rpc.Rpc.implement ToStringProtocol.to_string_rpc to_string
  ] in
  RpcUtil.start_server ~env:() ~implementations ~port