[@@@warning "-27"]
(* No shutdown events on Unix. *)
let await_shutdown_request ?(can_poweroff:_) ?(can_reboot:_) () =
  fst (Lwt.wait ())