type slots
= (Execution_context.t, Obj.t ‑> unit, Obj.t) Core_kernel.Pool.Slots.t3
type t
= slots Core_kernel.Pool.Pointer.t