simon/ocaml-trace
1
0
Fork 0
mirror of https://github.com/ocaml-tracing/ocaml-trace.git synced 2026-03-07 18:37:56 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

feat tef: write to trace.json if TRACE is either 1 or true

Browse source
This commit is contained in:
Simon Cruanes 2023-08-30 08:31:10 -04:00
parent fc5b243df5
commit b467678040
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/tef/trace_tef.ml
View file

@ -418,7 +418,7 @@ let setup ?(out = `Env) () =
| `File path -> Trace_core.setup_collector @@ collector ~out:(`File path) () | `File path -> Trace_core.setup_collector @@ collector ~out:(`File path) ()
| `Env -> | `Env ->
(match Sys.getenv_opt "TRACE" with (match Sys.getenv_opt "TRACE" with
| Some "1" -> | Some ("1" | "true") ->
let path = "trace.json" in let path = "trace.json" in
let c = collector ~out:(`File path) () in let c = collector ~out:(`File path) () in
Trace_core.setup_collector c Trace_core.setup_collector c