sig
  type move = Away of string | Into of string | Move of string * string
  type t =
      Created of string
    | Unlinked of string
    | Modified of string
    | Moved of Async_inotify.Event.move
  val to_string : Async_inotify.Event.t -> string
end