package bap-main

  1. Overview
  2. Docs
type level =
  1. | Debug
  2. | Info
  3. | Warning
  4. | Error
type info = {
  1. level : level;
  2. section : string;
  3. message : string;
}
type event +=
  1. | Message of info
type event +=
  1. | Progress of {
    1. task : string;
    2. note : string option;
    3. stage : int option;
    4. total : int option;
    }
val progress : ?note:string -> ?stage:int -> ?total:int -> string -> unit
val message : level -> section:string -> ('a, Format.formatter, unit) format -> 'a