--- /dev/null
+type content =
+ | Alert of {priority : [`low | `med | `hi]; subject : string; body : string}
+ | Data of {key : string list; value : string}
+ | Cache of
+ { mtime : Khatus_time.t
+ ; node : string
+ ; modul : string
+ ; key : string list
+ ; value : string
+ }
+ | Error of string
+ | Log of {location : string; level : [`info | `error]; msg : string}
+ | Status_bar of string
+
+type t =
+ {node : string; modul : string; content : content}
+
+val to_string : t -> string
+
+val next_time : t -> node:string -> time:Khatus_time.t -> Khatus_time.t