let
log_status t st =
Format
.fprintf t.logfmt
"Run %a"
pp_status st