Primus_print_main · bap-primus-print 2.5.0

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

module Param : sig ... end

val starts_with : string -> Core_kernel.Char.t -> bool

val strip : string -> string

val has_name : string -> Bap_primus.Std.Primus.Observation.Provider.t -> bool

val remove_provider : 
  string ->
  Bap_primus.Std.Primus.Observation.Provider.t list ->
  Bap_primus.Std.Primus.Observation.Provider.t list

val monitor_provider : 
  string ->
  Bap_primus.Std.Primus.Observation.Provider.t list ->
  Bap_primus.Std.Primus.Observation.Provider.t list

val parse_monitors : 
  string list ->
  Bap_primus.Std.Primus.Observation.Provider.t list

val print_event : 
  Format.formatter ->
  Bap_primus.Std.Primus.Observation.Provider.t ->
  Core_kernel.Sexp.t ->
  unit

val id : Format.formatter -> Bap_primus.Std.Primus.Pos.t -> unit

val print_pos : Format.formatter -> Bap_primus.Std.Primus.Pos.t -> unit

val rule_providers : Bare.Rule.t -> Base.String.t list

val print_trace : Format.formatter -> Bap_primus.Std.Primus.Pos.t list -> unit

type state = {

trace : Bap_primus.Std.Primus.pos list;

}

val concat : 
  'a Bap_future.Std.Stream.t list ->
  'b Bap_future.Std.Stream.t * 'b Bap_future.Std.signal

val process_rule : Bare.Rule.t -> Bare.fact list Bap_future.Std.Stream.t

val read_rules : string -> Bare.Rule.t list

val setup_rules_processor : Format.formatter -> string list -> unit

val state : state Bap_primus.Std.Primus.Machine.State.t

val start_monitoring : Config.reader -> unit