sig
  type spec = Getopt.opt
  val desc_warning_list : Loc.Args.spec
  val option_list : unit -> bool
  val desc_no_warn : Loc.Args.spec
  val set_flags_selected : ?silent:bool -> unit -> unit
end