sig
  type spec = Getopt.opt
  val desc_debug_list : Debug.Args.spec
  val option_list : unit -> bool
  val desc_debug_all : Debug.Args.spec
  val desc_debug : Debug.Args.spec
  val desc_shortcut : string -> Getopt.key -> Getopt.doc -> Debug.Args.spec
  val set_flags_selected : ?silent:bool -> unit -> unit
end