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;