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