package core_bench

  1. Overview
  2. Docs
type t =
  1. | Quiet
  2. | Low
  3. | High
include Sexplib0.Sexpable.S with type t := t
val t_of_sexp : Sexplib0.Sexp.t -> t
val sexp_of_t : t -> Sexplib0.Sexp.t
val set_verbosity : t -> unit
val print_high : ('a, Core.Out_channel.t, unit) Core.format -> 'a
val print_low : ('a, Core.Out_channel.t, unit) Core.format -> 'a