anchor.diff:                      ets:delete(DataRef, {Bucket, Key}),
                       ets:match_delete(IndexRef, ?DELETE_PTN(Bucket, Key)),
                       %% prevents leak in the TimeRef table on expire
  -                    case TimeRef of
  -                      undefined -> ok;
  -                      _ -> ets:delete(TimeRef, Timestamp)
  -                    end,
  +                    delete_time_entry(TimeRef, Timestamp),
                       case MaxMemory of
                           undefined ->
                               UsedMemory1 = UsedMemory;
  
positive.code:     ets:insert(TimeRef, {Now, {Bucket, Key}}).
  
  %% @private
  %% @doc Dump some entries if the max memory size has
  %% been breached.
  trim_data_table(MaxMemory, UsedMemory, _, _, _, Freed) when
  
negative.code:                 0;
              [{_BKey, {{ts, OldTimestamp}, _OldVal}}=OldObject] ->
                  %% prevents leak in the TimeRef table on update
                  delete_time_entry(TimeRef, OldTimestamp),
                  object_size(OldObject)
          end,
      {ok, Size} = do_put(Bucket, PrimaryKey, Val1, IndexSpecs, DataRef, IndexRef),
  