anchor.diff:  -export([log_merge_errors/4, meta/2, merge_value/2]).
   %% MR helper funs
   -export([value/1, counter_value/1, set_value/1, map_value/1]).
  +%% Other helper funs
  +-export([is_crdt/1]).
   
   -include("riak_kv_wm_raw.hrl").
   -include("riak_object.hrl").
  
positive.code: map_value(RObj) ->
      {{_Ctx, Map}, _Stats}  = value(RObj, ?MAP_TYPE),
      Map.
  
  %% @TODO in riak_dt change value to query allow query to take an
  %% argument, (so as to query subfields of map, or set membership etc)
  
negative.code:      ?_test(?TIMED_QC(prop_binary_roundtrip()))}.
  
  prop_binary_roundtrip() ->
      ?FORALL({_Type, Mod}, oneof(?MOD_MAP),
              begin
                  {ok, ?CRDT{mod=SMod, value=SValue}} = from_binary(to_binary(?CRDT{mod=Mod, value=Mod:new()})),
                  conjunction([{module, equals(Mod, SMod)},
                               {value, Mod:equal(SValue, Mod:new())}])
              end).
  
  
  -endif.
  -endif.
  