module S: sig .. end
sig
end
exception Closed
type 'a t = {
'a
put : 'a -> unit;
'a -> unit
get : unit -> 'a;
unit -> 'a
close : unit -> unit;
unit -> unit
kill : unit -> unit;