anchor.diff:  		  FName = refac_syntax:implicit_fun_name(Fun),
   		  B = refac_syntax:atom_value(refac_syntax:
   					      arity_qualifier_body(FName)),
  -		  A = refac_syntax:atom_value(refac_syntax:
  +		  A = refac_syntax:integer_value(refac_syntax:
   					      arity_qualifier_argument(FName)),
   		  case {B, A} of
   		      {Name, Arity} ->
  
positive.code:   ?wrangler_io("\nCMD: ~p:tuple_funpar(~p, ~p, ~p, ~p,~p, ~p).\n", 
              [?MODULE,FileName, ParLine, ParCol, Number, SearchPaths, TabWidth]),
  	{ok, {AnnAST, Info}} = parse_file(FileName, SearchPaths, TabWidth),
      case check_first_pos({ParLine, ParCol}, AnnAST) of 
  	{error, Reason} -> {error, Reason};
  	{FirstPar, Type} ->
  
negative.code:       Fun = refac_syntax:arity_qualifier_body(Tree),
        Fun_Name = refac_syntax:atom_value(Fun),
        Arg = refac_syntax:arity_qualifier_argument(Tree),
        Arg1 = refac_syntax:integer_value(Arg),
        DefMod = get_fun_def_mod(Fun),
        if (Fun_Name == Name) and (Arg1 == Arity) and (DefMod == Mod) ->
          {refac_syntax:copy_attrs(Tree, refac_syntax:arity_qualifier(Fun, 
  