add get_default_level()

This commit is contained in:
Simon Cruanes 2024-03-05 15:27:53 -05:00
parent 37f8a237ff
commit b52f15068d
2 changed files with 7 additions and 1 deletions

View file

@ -24,6 +24,7 @@ let[@inline] enabled () =
| None -> false
| Some _ -> true
let[@inline] get_default_level () = A.get default_level_
let[@inline] set_default_level l = A.set default_level_ l
let[@inline] set_current_level l = A.set current_level_ l
let[@inline] get_current_level () = A.get current_level_

View file

@ -22,9 +22,14 @@ val enabled : unit -> bool
This is fast, so that the traced program can check it before creating
any span or message. *)
val get_default_level : unit -> Level.t
(** Current default level for spans.
@since NEXT_RELEASE *)
val set_default_level : Level.t -> unit
(** Set level used for spans that do not specify it. The default
default value is [Level.Trace] *)
default value is [Level.Trace].
@since NEXT_RELEASE *)
val with_span :
?level:Level.t ->