let
report logger ev =
logger.fwrite
{
shard = logger.lshard;
timestamp = now ();
event = ev;
}