anchor.diff:      case lists:keysearch(category, 1, refac_syntax:get_ann(Exp)) of
   	{value, {category, {macro_name, _, _}}} ->
   	    true;
  -	false ->
  +	_ ->
   	    false
       end.
    
  +
  
positive.code: 			false ->
  			    [{Exp1, Exp2}]
  		    end;
  		{_, _} ->
  		    SubTrees1 = erl_syntax:subtrees(Exp1),
  		    SubTrees2 = erl_syntax:subtrees(Exp2),
  		    do_expr_anti_unification(SubTrees1, SubTrees2)
  
negative.code: -include("../include/wrangler.hrl").
  
  %% minimal number of tokens.
  -define(DEFAULT_CLONE_LEN, 40).
  
  %% Minimal number of class members.
  -define(DEFAULT_CLONE_MEMBER, 2).
  