functor (M : sig val name : string end) ->
sig
val my_verbosity_level : Log.level Pervasives.ref
val logf :
?level:[< `always | `debug | `error | `fatal | `info | `trace | `warn
> `info ] ->
?attributes:[< `Black
| `Blue
| `Bold
| `Cyan
| `Green
| `Magenta
| `Red
| `Underline
| `White
| `Yellow ]
list ->
('a, Format.formatter, unit, unit, unit, unit) Pervasives.format6 -> 'a
val log :
?level:[< `always | `debug | `error | `fatal | `info | `trace | `warn
> `info ] ->
?attributes:[< `Black
| `Blue
| `Bold
| `Cyan
| `Green
| `Magenta
| `Red
| `Underline
| `White
| `Yellow ]
list ->
string -> unit
val log_pp :
?level:[< `always | `debug | `error | `fatal | `info | `trace | `warn
> `info ] ->
?attributes:[< `Black
| `Blue
| `Bold
| `Cyan
| `Green
| `Magenta
| `Red
| `Underline
| `White
| `Yellow ]
list ->
(Format.formatter -> 'a -> unit) -> 'a -> unit
end