let
warning s =
log_aux warning (
Ocsiconfig
.get_verbose ()) s