mirror of
https://github.com/ocaml-tracing/ocaml-trace.git
synced 2026-03-07 18:37:56 -05:00
add get_default_level()
This commit is contained in:
parent
37f8a237ff
commit
b52f15068d
2 changed files with 7 additions and 1 deletions
|
|
@ -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_
|
||||
|
|
|
|||
|
|
@ -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 ->
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue