sig
type t = string option
val compare : Rapids.Release_order.t -> Rapids.Release_order.t -> int
val set_comparator :
(Rapids.Release_order.t -> Rapids.Release_order.t -> int) -> unit
val scribe : 'a Conduit.conduit -> 'a -> Rapids.Release_order.t -> unit
val io : string option Io.literate
end