Module `Cli_lib.Exceptions`

val handle_nicely : 
  ( unit -> 'a Async.Deferred.t ) ->
  unit ->
  'a0 Async.Deferred.t