anchor.diff:             (FunArity == Arity) and (DefMod == Mod) of
           true ->
             Clauses = refac_syntax:function_clauses(Tree),
  -          NewClauses = new_clause(Clauses, N, RecName, FieldList, AnnAST),	      
  +          NewClauses = new_clause(Clauses, N, RecName, FieldList, AnnAST),      
             {refac_syntax:copy_attrs(Tree, 
                          refac_syntax:function(FunName, NewClauses)), false};
   	false -> {Tree, false}
  
positive.code:       ChangedFiles = [File | ChangedClientFiles],
        io:format("The following files have been changed "
                  "by this refactoring:\n~p\n",[ChangedFiles]),
        {ok, ChangedFiles};
      false -> 
        refac_util:write_refactored_files([{{File, File}, AnnAST1}]), {ok, [File]}
    end.
  
  
  
negative.code:     _ -> unknown
    end.
  
  
  %% =====================================================================
  %% @spec analyze_match_expr(AnnAST::syntaxtree(), Tree::syntaxtree(),
  %%                     N::integer()) ->  atom()
  %%
  %% @end
  %% =====================================================================
  analyze_match_expr(AnnAST, Tree, N)->
    Body = refac_syntax:match_expr_body(Tree),
    analyze_tuple(AnnAST, Body, N).
  
  
  
  %% =====================================================================
  %% @spec create_case(Tree::syntaxtree(), First::[syntaxtree()],
  %%          Last::[syntaxtree()], Tuple::syntaxtree(), RecName::string(),
  %%          FieldList::[string()], Operator::syntaxtree()) ->  atom()
  %%
  %% @end
  %% =====================================================================    
  create_case(Tree, First, Last, Tuple, RecName, FieldList, Operator)->
    TupleElements = get_tuple_elements(Tuple, 1, [],length(FieldList)),
    NewRecFields = lists:map(fun({FName, Value})->
  