sig
val shutdown : ?force:unit Import.Deferred.t -> int -> unit
val shutting_down : unit -> [ `No | `Yes of int ]
val shutdown_and_raise :
?force:unit Import.Deferred.t -> int -> Core.Std.never_returns
val at_shutdown : (unit -> unit Import.Deferred.t) -> unit
val ounit_tests : unit -> OUnit.test
end