sig type obj_t = Obj.t type t val create : int -> Obj.Ephemeron.t val length : Obj.Ephemeron.t -> int val get_key : Obj.Ephemeron.t -> int -> Obj.Ephemeron.obj_t option val get_key_copy : Obj.Ephemeron.t -> int -> Obj.Ephemeron.obj_t option val set_key : Obj.Ephemeron.t -> int -> Obj.Ephemeron.obj_t -> unit val unset_key : Obj.Ephemeron.t -> int -> unit val check_key : Obj.Ephemeron.t -> int -> bool val blit_key : Obj.Ephemeron.t -> int -> Obj.Ephemeron.t -> int -> int -> unit val get_data : Obj.Ephemeron.t -> Obj.Ephemeron.obj_t option val get_data_copy : Obj.Ephemeron.t -> Obj.Ephemeron.obj_t option val set_data : Obj.Ephemeron.t -> Obj.Ephemeron.obj_t -> unit val unset_data : Obj.Ephemeron.t -> unit val check_data : Obj.Ephemeron.t -> bool val blit_data : Obj.Ephemeron.t -> Obj.Ephemeron.t -> unit val max_ephe_length : int end