Signatures.LOG
val level : int ref
val dprintf : int -> ('a, Format.formatter, unit) format -> 'a
val is_logging : int -> bool
val eprintf : ('a, Format.formatter, unit) format -> 'a
val raw_dprintf : int -> ('a, Format.formatter, unit) format -> 'a