anchor.diff:            key :: key(),
             contents :: [#r_content{}],
             vclock = vclock:fresh() :: vclock:vclock(),
  -          updatemetadata=dict:store(clean, true, dict:new()) :: riak_object_dict(),
  +          updatemetadata=dict:from_list([{clean, true}]) :: riak_object_dict(),
             updatevalue :: term()
            }).
   -opaque riak_object() :: #r_object{}.
  
positive.code: newts(B, K, V, MD) ->
      new_int2(B, K, V, MD).
  
  %% internal version after all validation has been done
  new_int(B, K, V, MD) ->
      case size(K) > ?MAX_KEY_SIZE of
  
negative.code:         false ->
              case MD of
                  no_initial_metadata ->
                      Contents = [#r_content{metadata=dict:new(), value=V}],
                      #r_object{bucket=B,key=K,
                                contents=Contents,vclock=vclock:fresh()};
                  _ ->
                      new_int2(B, K, V, MD)
              end
  