sig
  val stop_upon_sigbus : unit -> unit
  val stop_upon_sigsegv : unit -> unit
  val stop_upon_sigpipe : unit -> unit
  val stop_upon_exit : unit -> unit
  val stop_me_now : unit -> unit
end