anchor.diff:  make_export_attr(LineNo) ->
       {{attribute, LineNo, export, [
   				  {validate,          1},
  -				  {extract,             2},
  +				  {extract,           2},
   				  {get_partition_key, 2}
   				 ]}, LineNo + 1}.
   
  -%%-ifdef(TEST).
  +-ifdef(TEST).
   -compile(export_all).
   
   -define(VALID,   true).
  
positive.code: -spec make_atom(atom(), pos_integer()) -> expr().
  make_atom(A, LineNo) when is_atom(A) -> {atom, LineNo, A}.
  
  -spec make_call(expr(), expr(), pos_integer()) -> expr().
  make_call(FnName, Args, LineNo) ->
      {call, LineNo, FnName, Args}.
  
  
negative.code: 	_         -> filter_ast(T, [H | Acc])
      end.
  
  -spec build_extract_fn([[#riak_field{}]], pos_integer(), ast()) ->
  			      {expr(), pos_integer()}.
  build_extract_fn([], LineNo, Acc) ->
      Clauses = lists:flatten(lists:reverse(Acc)),
  