package albatross

  1. Overview
  2. Docs
type log_event = [
  1. | `Login of Name.t * Ipaddr.V4.t * int
  2. | `Logout of Name.t * Ipaddr.V4.t * int
  3. | `Startup
  4. | `Unikernel_start of Name.t * int * (string * string) list * (string * Name.t) list
  5. | `Unikernel_stop of Name.t * int * process_exit
  6. | `Hup
]
val name : log_event -> Name.t
val pp_log_event : log_event Fmt.t
type t = Ptime.t * log_event
val pp : t Fmt.t