+ wip logs
This commit is contained in:
parent
f468380451
commit
e4db8cdab5
1 changed files with 8 additions and 0 deletions
|
|
@ -48,6 +48,14 @@ let () =
|
||||||
[ Devices.db_connection; Devices.secmod_signkey; Devices.secmod_denom ]
|
[ Devices.db_connection; Devices.secmod_signkey; Devices.secmod_denom ]
|
||||||
in
|
in
|
||||||
let middlewares = Vif.Middlewares.[] in
|
let middlewares = Vif.Middlewares.[] in
|
||||||
|
let print_src_list () =
|
||||||
|
let src_l = Logs.Src.list () in
|
||||||
|
let pp_src_list =
|
||||||
|
Fmt.list ~sep:(Fmt.any ", ") (Fmt.using Logs.Src.name Fmt.string)
|
||||||
|
in
|
||||||
|
Logs.debug (fun m -> m "src list: %a" pp_src_list src_l)
|
||||||
|
in
|
||||||
|
print_src_list ();
|
||||||
Logs.info (fun m ->
|
Logs.info (fun m ->
|
||||||
m ~tags:(Util.Log_reporter.detail "...") "Starting MTE server");
|
m ~tags:(Util.Log_reporter.detail "...") "Starting MTE server");
|
||||||
Vif.run ~cfg ~devices ~middlewares routes env
|
Vif.run ~cfg ~devices ~middlewares routes env
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue