let replace t k v =
    match Table.find t.table k with
    | None -> `No_such_key
    | Some elt -> (Elt.value elt).value <- v; `Ok