anchor.diff:  parse_integer(Value) when is_binary(Value) ->
       parse_integer(binary_to_list(Value));
   parse_integer(Value) when is_list(Value) ->
  -    try 
  +    try
           {ok, list_to_integer(Value)}
  -    catch 
  +    catch
           _Type : Reason ->
               {error, Reason}
       end.
  
positive.code:     F = fun(Key, Value) -> parse_field(Key, Value, Types) end,
  
      ?assertMatch(
         {ok, <<"">>}, 
         F(<<"field_bin">>, <<"">>)),
  
      ?assertMatch(
         {ok, <<"A">>}, 
         F(<<"field_bin">>, <<"A">>)),
  
      ?assertMatch(
         {ok, <<"123">>}, 
         F(<<"field_bin">>, <<"123">>)).
  
  parse_field_integer_test() ->
  
negative.code: 
  -include("riak_kv_wm_raw.hrl").
  
  -define(BUCKETFIELD, <<"$bucket">>).
  -define(KEYFIELD, <<"$key">>).
  
  %% @type data_type_defs()  :: [data_type_def()].
  %% @type data_type_def()   :: {MatchFunction::function(), ParseFunction::function()}.
  %% @type failure_reason()  :: {unknown_field_type, Field :: binary()}
  