Module Debug.Channel
val make : ?default:bool -> string -> tval active : t -> int -> boolval set_debug : t -> int -> unitval name : t -> stringval is_default : t -> boolval root : tval default : unit -> t listval find_string : string -> t list- raises Error.Error
if not found
val all_names : unit -> string listval all : unit -> t list