log faster when log level is not high enough

dbuenzli's log library (https://github.com/dbuenzli/logs) does this:
```
Logs.err (fun m -> m "invalid kv (%a,%a)" pp_key k pp_val v);
```
apparently it allows to skip the formatting of things which are not going to be printed
