let
ignore_exceptions f x =
try
ignore (f x)
with
_
->
()