simon/ocaml-trace
1
0
Fork 0
mirror of https://github.com/ocaml-tracing/ocaml-trace.git synced 2026-03-08 03:47:57 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

tef: expose subscriber_jsonl

Browse source
This commit is contained in:
Simon Cruanes 2024-09-09 14:44:13 -04:00
parent bebd037803
commit 59db458fec
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
2 changed files with 9 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/tef/trace_tef.ml
View file

@ -408,6 +408,9 @@ module Private_ = struct
let on_tracing_error = on_tracing_error let on_tracing_error = on_tracing_error
let subscriber_jsonl ~finally ~out () =
subscriber_ ~finally ~mode:`Jsonl ~out ()
let collector_jsonl ~finally ~out () : collector = let collector_jsonl ~finally ~out () : collector =
collector_ ~finally ~mode:`Jsonl ~out () collector_ ~finally ~mode:`Jsonl ~out ()

6
src/tef/trace_tef.mli
View file

@ -48,6 +48,12 @@ module Private_ : sig
val on_tracing_error : (string -> unit) ref val on_tracing_error : (string -> unit) ref
val subscriber_jsonl :
finally:(unit -> unit) ->
out:[ `File_append of string | `Output of out_channel ] ->
unit ->
Trace_subscriber.t
val collector_jsonl : val collector_jsonl :
finally:(unit -> unit) -> finally:(unit -> unit) ->
out:[ `File_append of string | `Output of out_channel ] -> out:[ `File_append of string | `Output of out_channel ] ->