sig
type t
val full_name : Util.Section.t -> string
val set_debug : Util.Section.t -> int -> unit
val clear_debug : Util.Section.t -> unit
val get_debug : Util.Section.t -> int option
val cur_level : Util.Section.t -> int
val iter : (string * Util.Section.t) Sequence.t
val root : Util.Section.t
val zip : Util.Section.t
val make :
?parent:Util.Section.t ->
?inheriting:Util.Section.t list -> string -> Util.Section.t
end