anchor.diff:      Res = case ?ETS:lookup(DB, Key) of
                 [{Key, {Value, _WriteLock, _ReadLock, Version}}] ->
                     {ok, Value, Version};
  -              [] ->
  -                  {ok, empty_val, -1}
  +              [] -> {ok, empty_val, -1}
             end,
   %%     Stop = erlang:now(),
   %%     Span = timer:now_diff(Stop, Start),
  
positive.code:         [{Key, {_Value, WriteLock, ReadLock, _Version}}] ->
              % better use ets:update_element?
              ?ETS:insert(DB, {Key, {Value, WriteLock, ReadLock, Version}});
          [] ->
              ?ETS:insert(DB, {Key, {Value, false, 0, Version}})
      end,
      DB.
  
  
negative.code:     case ?ETS:lookup(DB, Key) of
          [{Key, {_Value, WriteLock, ReadLock, Version}}] ->
              {DB, {WriteLock, ReadLock, Version}};
          [] -> {DB, failed}
      end.
  
  %% @doc reads the version and value of a key
  