anchor.diff:                 rets_client:put(localhost,tibbe)),
     ?assertEqual({200,"true"},
                  rets_client:put(localhost,tibbe,17,foo)),
  +  ?assertEqual({200,[{tibbe,1}]},
  +               rets_client:get(localhost)),
     ?assertMatch({409,_},
                  rets_client:put(localhost,tibbe,17,a)).
   
  
positive.code:     {"PUT",   [Tab|KeyL],[]}          -> je(ets({insert,Tab,KeyL,body(Req)}));
      {"PUT",   [Tab|KeyL],["counter"]} -> ets({counter,Tab,KeyL});
      {"PUT",   [Tab|KeyL],["reset"]}   -> ets({reset,Tab,KeyL});
      {"GET",   [[]]      ,[]}          -> je([l2b(T)||T<-gcall({all,[]})]);
      {"GET",   [Tab]     ,[]}          -> je(ets({keys,Tab}));
      {"GET",   [Tab|KeyL],[]}          -> ets({get,Tab,KeyL});
      {"GET",   [Tab|KeyL],["multi"]}   -> je(ets({multi_get,Tab,KeyL}));
  
negative.code: 
  %% exporting keys
  elems_to_binary(T) ->
    l2b(join(tuple_to_list(T),<<"/">>)).
  
  join([E],_) -> [E];
  join([E|R],D) -> [E,D|join(R,D)].
  