External_watchdog.Hypervisor
module PP : sig ... end
val main : socket_dir:string -> unit Tezos_base.TzPervasives.tzresult Lwt.t