sig
type t = {
messages : int option;
size : Core.Std.Byte_units.t option;
time : (Core.Std.Time.Ofday.t * Core.Std.Zone.t) option;
keep : [ `All | `At_least of int | `Newer_than of Core.Std.Time.Span.t ];
}
val t_of_sexp : Sexplib.Sexp.t -> Log.Rotation.t
val sexp_of_t : Log.Rotation.t -> Sexplib.Sexp.t
end