sig
  type 'a t = {
    flags : unit Deprecated_command.Flag.t list;
    get : unit -> 'a;
  }
end