sig   module B0_dir :     sig       type t       val v : b0_dir:B0.Fpath.t -> B0_driver.B0_dir.t       val exists : B0_driver.B0_dir.t -> bool       val must_exist : B0_driver.B0_dir.t -> unit B0.result       val dir : B0_driver.B0_dir.t -> B0.Fpath.t       val variant_dir : B0_driver.B0_dir.t -> B0.Fpath.t       val default_variant_name : B0_driver.B0_dir.t -> string option       val set_default_variant_name :         B0_driver.B0_dir.t -> string option -> unit B0.result       val default_variant_scheme_name : B0_driver.B0_dir.t -> string option       val set_default_variant_scheme_name :         B0_driver.B0_dir.t -> string option -> unit B0.result     end   module Driver :     sig       type exec = [ `Driver | `Instance ]       type setup       val b0_dir : B0_driver.Driver.setup -> B0_driver.B0_dir.t       val color : B0_driver.Driver.setup -> B0.Tty.cap option       val verbosity : B0_driver.Driver.setup -> B0.Log.level option       val exec : B0_driver.Driver.setup -> B0_driver.Driver.exec       type cmd =           (B0_driver.Driver.setup -> int) Cmdliner.Term.t *           Cmdliner.Term.info * B0_driver.Driver.exec       type t       val create :         name:string ->         version:string ->         libs:string list -> B0_driver.Driver.cmd list -> B0_driver.Driver.t       val set : B0_driver.Driver.t -> unit       val driver_main : unit -> unit       val instance_main : unit -> unit     end   module Cli :     sig       val default_cache_dir : B0.Fpath.t       val exit_no_description : int       val exit_driver_setup_err : int       val exit_some_error : int       val driver_default_exits : Cmdliner.Term.exit_info list       val handle_error : int B0.result -> int       val no_description_found : unit -> int       val path_arg : B0.Fpath.t Cmdliner.Arg.conv       val root : B0.Fpath.t option Cmdliner.Term.t       val cwd : B0.Fpath.t option Cmdliner.Term.t       val b0_dir : B0.Fpath.t option Cmdliner.Term.t       val color : B0.Tty.cap option Cmdliner.Term.t       val verbosity : B0.Log.level option Cmdliner.Term.t       val cache_dir : B0.Fpath.t option Cmdliner.Term.t       val cache_index : B0.Fpath.t option Cmdliner.Term.t       val variant_env : string       val variant : string option Cmdliner.Term.t       val variant_scheme_env : string       val variant_scheme : string option Cmdliner.Term.t       type out_fmt = [ `Long | `Normal | `Short ]       val out_fmt : [ `Long | `Normal | `Short ] Cmdliner.Term.t       val file_kind : [ `All | `Built | `Roots ] Cmdliner.Term.t       val ctrl : B0.Build.ctrl Cmdliner.Term.t       val s_driver_opts : string       val driver_dir : B0.Fpath.t option Cmdliner.Term.t       val driver_only : bool Cmdliner.Term.t       val driver_force : bool Cmdliner.Term.t       val driver_trust : bool Cmdliner.Term.t       val driver_ocamlc : string option Cmdliner.Term.t       val driver_ocamlopt : string option Cmdliner.Term.t       val driver_compile_kind :         [ `Auto | `Byte | `Native ] option Cmdliner.Term.t       val driver_compile : string list Cmdliner.Term.t       val driver_link : string list Cmdliner.Term.t       val common_man : Cmdliner.Manpage.block     end end