sig
  type level
  val level_full_debug : Log.level
  val level_debug : Log.level
  val level_full_info : Log.level
  val level_info : Log.level
  val level_warn : Log.level
  val level_error : Log.level
  val level_fatal : Log.level
  val level_of_string : string -> Log.level
  val string_of_level : Log.level -> string
  val enable_level : Log.level -> unit
  val disable_level : Log.level -> unit
  val set_level : Log.level -> unit
  val is_enabled : Log.level -> bool
  val toggle_level : Log.level -> unit
  val with_level : Log.level -> (unit -> 'a) -> 'a
  val level_names : string list
  val disable_ansi_esc : unit -> unit
  val disable_ansi_color : unit -> unit
  val change_log_target : Pervasives.out_channel -> unit
  val add_log_target : Pervasives.out_channel -> unit
  val open_log_file : string -> Pervasives.out_channel
  val full_debug : string Lazy.t -> unit
  val debug : string Lazy.t -> unit
  val full_info : string Lazy.t -> unit
  val info : string Lazy.t -> unit
  val warn : string Lazy.t -> unit
  val error : string -> unit
  val fatal : string -> 'a
  exception Log_fatal of string
end