type t = unit C.ptr
val t : t C.typval create : (unit -> t G.return) G.resultval destroy : (t -> unit G.return) G.resultval clear : (t -> unit G.return) G.resultval count : (t -> int G.return) G.resultval put : (t -> string Ctypes_static.ocaml -> int -> string Ctypes_static.ocaml -> int -> unit G.return) G.result