anchor.diff:         is_binary(Id),
          is_binary(Doc) ; is_list(Doc) ->
       Values = to_insert_vals(Doc),
  -    {{update, 1}, _} =
  +    {{update, _}, _} =
           dikdik_db:simple_query(<<"UPDATE ", Table/binary," SET data=data || ('", Values/binary,"') WHERE id='", Id/binary, "'">>),
       ok.
   
  
positive.code: insert(Table, Id, Doc)
    when is_binary(Table),
         is_binary(Id),
         is_binary(Doc) ; is_list(Doc) ->
      Values = to_insert_vals(Doc),    
      {{insert, _, _}, _} =
          dikdik_db:simple_query(<<"INSERT INTO ", Table/binary," (id, data) VALUES ('", Id/binary, "','", Values/binary,"')">>),
      ok.
  
negative.code: 
  %% API
  -export([new/1
          ,new/2
          ,all/1
          ,match/2
          ,lookup/2
  