val name : string
val version : string
val doc : string
val argv : string array
val debug : ( 'a, Format.formatter, unit ) Core_kernel.format -> 'a
val info : ( 'a, Format.formatter, unit ) Core_kernel.format -> 'a
val warning : ( 'a, Format.formatter, unit ) Core_kernel.format -> 'a
val error : ( 'a, Format.formatter, unit ) Core_kernel.format -> 'a
val debug_formatter : Format.formatter
val info_formatter : Format.formatter
val warning_formatter : Format.formatter
val error_formatter : Format.formatter
val report_progress : ?task:string -> ?note:string -> ?stage:int -> ?total:int -> unit -> unit
module Config : sig ... end
type t = {
pending : Mid.t Core_kernel.Fqueue.t;
finished : Mid.Set.t;
}
module RR (Machine : Bap_primus.Std.Primus.Machine.S) : sig ... end
val register : bool -> unit
val enabled : bool Config.param