Ocamlformat_stdlib.Warningval with_warning_filter :
filter_warning:(Ocaml_common.Location.t -> Ocaml_common.Warnings.t -> bool) ->
filter_alert:(Ocaml_common.Location.t -> Ocaml_common.Warnings.alert -> bool) ->
f:(unit -> 'a) ->
'aval print_warning : Ocaml_common.Location.t -> Ocaml_common.Warnings.t -> unitval is_unexpected_docstring : Ocaml_common.Warnings.t -> boolval is_deprecated_alert : Ocaml_common.Warnings.alert -> bool