module type Mergeable = sig .. end
sig
end
type t
val make : unit -> t
unit -> t
val merge : t -> t -> unit
t -> t -> unit
merge a b
b
a