anchor.diff:                   end,
                    Acc0).
   
  -drop(_) -> ok.
  +drop(BitcaskRoot) ->
  +    %% todo: once bitcask has a more friendly drop function
  +    %%  of its own, use that instead.
  +    State = erlang:get(?MODULE),
  +    bitcask:close(State),
  +    {ok, FNs} = file:list_dir(BitcaskRoot),
  +    [file:delete(FN) || FN <- FNs],
  +    file:del_dir(BitcaskRoot),
  +    ok.
   
  -is_empty(none) ->
  +is_empty(_BitcaskRoot) ->
       %% Determining if a bitcask is empty requires us to find at least
       %% one value that is NOT a tombstone. Accomplish this by doing a fold
       %% that forcibly bails on the very first k/v encountered.
  
positive.code:             {error, Reason}
      end.
  
  list(none) ->
      State0 = erlang:get(?MODULE),
      case bitcask:list_keys(State0) of
          KeyList when is_list(KeyList) ->
  
negative.code:             {error, Reason}
      end.
  
  delete(_BitcaskRoot, BKey) ->
      State0 = erlang:get(?MODULE),
      case bitcask:delete(State0, term_to_binary(BKey)) of
          {ok, State} ->
  