module Rd:sig..end
type tbl
val create : int -> tblval clear : tbl -> unitval put : tbl -> int * Bi_share.type_id -> Obj.t -> unitput tbl pos x puts the position of a new shared value into the
table. pos is the absolute position of the first byte
of the ref value excluding its tag.val get : tbl -> int * Bi_share.type_id -> Obj.t