log reporter style renderer

This commit is contained in:
swrup 2026-04-15 04:51:53 +02:00 committed by Swrup
parent 7a5fe47162
commit f394c24e3b
3 changed files with 47 additions and 58 deletions

View file

@ -50,11 +50,11 @@ let routes =
module RNG = Mirage_crypto_rng.Fortuna
let log_level = Some Logs.Info
let t0 = Mkernel.clock_monotonic ()
let () =
let ( let@ ) finally fn = Fun.protect ~finally fn in
Log_reporter.setup log_level;
Log_reporter.setup ~t0;
let rng =
let rng () = Mirage_crypto_rng_mkernel.initialize (module RNG) in
Mkernel.map rng Mkernel.[]