fix secmod add/write; + wip test revoke

This commit is contained in:
swrup 2026-02-25 00:12:05 +01:00
parent 836b9ff64a
commit 05cfa7a5b1
8 changed files with 165 additions and 45 deletions

View file

@ -48,8 +48,13 @@ module Log_reporter = struct
in
{ report }
let set_level_secmods lvl =
let secmod_srcs = [ Secmod_rsa.src; Secmod_eddsa.src ] in
List.iter (fun src -> Logs.Src.set_level src lvl) secmod_srcs;
()
let setup () =
(*Logs.Src.set_level Secmod_rsa.src (Some Logs.Debug);*)
(*set_level_secmods (Some Logs.Debug);*)
let level = Some Logs.Info in
Logs.set_level ~all:false level;
Fmt_tty.setup_std_outputs ~style_renderer:`Ansi_tty ~utf_8:true ();