Computation.Recursive_scopesval empty : tval add_exn : t -> key:'a Fix_id.t -> data:('a, unit) T.packed_info lazy_t -> tval add_overwriting :
t ->
key:'a Fix_id.t ->
data:('a, unit) T.packed_info lazy_t ->
tval find : t -> 'a Fix_id.t -> ('a, unit) T.packed_info lazy_t optionval find_exn : t -> 'a Fix_id.t -> ('a, unit) T.packed_info lazy_t