anchor.diff:      Memory = proplists:get_value(riak_kv_cache_backend_memory, Config, ?DEFAULT_MEMORY),
       {ok, #state { 
           ttl=TTL, max_ttl=MaxTTL, max_memory=Memory * 1024 * 1024, used_memory=0,
  -        obj_tree=gb_trees:empty(), time_tree=gb_trees:empty()
  +        obj_tree=gb_trees:empty(), time_tree=gb_trees:empty(),
  +        clock_advance = 0
       }}.
   
   
  
positive.code:     {ok, Value} = get(State, {Bucket, Key}),
      {ok, Value} = get(State, {Bucket, Key}),
      
      % Wait 0.05 seconds, object should be cleared from cache...
      timer:sleep(50),
      
      % Get the object again, it should be missing...
      {error, notfound} = get(State, {Bucket, Key}),
  
negative.code: 
  stop(State) -> 
      gen_server:call(State, stop).
  
  -ifdef(TEST).
  clock_advance(State, USec) -> 
      gen_server:call(State, {clock_advance, USec}).
  -endif.
  
  
  %%% GEN_SERVER %%%
  