sig
type ('a, 'b) result
val debug_level : unit -> int
val with_color : unit -> bool
val line_width : int
val indent : int
val print_string : string -> (unit, 'b) Docout.LOGGER_CONFIGURATION.result
val do_nothing : unit -> (unit, 'b) Docout.LOGGER_CONFIGURATION.result
val name : string
end