Source file `tracing_.ml`

1
2
3
4
5
6
7
8
9
# 1 "src/private/tracing_.dummy.ml"
type span = unit

let enabled () = false
let dummy_span = ()
let enter_span _name = dummy_span
let exit_span = ignore
let set_thread_name = ignore
let with_span _ f = f dummy_span