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

test: fix tests

Browse source
This commit is contained in:
Simon Cruanes 2024-09-09 14:44:33 -04:00
parent 839eb3fcdf
commit 136ff47e66
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
2 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
test/t1.ml
View file

@ -25,9 +25,9 @@ let run () =
Trace.enter_manual_sub_span ~parent:pseudo_async_sp
~flavor:
(if _i mod 3 = 0 then
`Sync
else
`Async)
`Sync
else
`Async)
~__FILE__ ~__LINE__ "sub-sleep"
in
@ -43,5 +43,5 @@ let run () =
done
let () =
Trace_tef.Internal_.mock_all_ ();
Trace_tef.Private_.mock_all_ ();
Trace_tef.with_setup ~out:`Stdout () @@ fun () -> run ()

2
test/t2.ml
View file

@ -14,7 +14,7 @@ let%trace rec fib2 x =
fib2 (x - 1) + fib2 (x - 2)
let () =
Trace_tef.Internal_.mock_all_ ();
Trace_tef.Private_.mock_all_ ();
let@ () = Trace_tef.with_setup ~out:`Stdout () in
Trace_core.set_process_name "main";