module Make_logger:
Parameters: |
|
include Metadoc
type('a, 'b)
result =('a, 'b) P.result
val print : [< `Debug of int | `Error | `Normal | `Warning ] -> t -> (unit, 'a) P.result
val normal : [> `Normal ]
val error : [> `Error ]
val warning : [> `Warning ]
val verbose : [> `Debug of int ]
val very_verbose : [> `Debug of int ]