anchor.diff:       {{test_server, call_crash, 3}, [modulename, functionname, arglist], term},
        {{test_server, call_crash, 4}, [term, modulename, functionname, arglist], term},
        {{test_server, call_crash, 5}, [term, term, modulename, functionname, arglist], term}].
  +
  +
  +
  +renamed_warn_msg(FunName) ->
  +    "\n=================================================================================\n"
  +	"WARNING: Wrangler has renamed the uses of "++atom_to_list(FunName)++" within the following expressions while without enough "
  +	"syntactic/semantic information. Please check manually!\n".
  +     
  +
  +not_renamed_warn_msg(FunName) ->
  +    "\n=================================================================================\n"
  +	"WARNING: Wrangler could not infer whether the uses of " ++ atom_to_list(FunName)++ 
  +	" at the following positions refer to the function renamed, and they are not renamed."
  +	" Please check manually!\n".
  +     
   
   
   start_atom_process() ->
  
positive.code: 			 throw({warning, "The new function would be Test Server special function, continue?"});
  		     false -> ok
  		 end
      end.		 
  									    
  commontest_name_checking(UsedFrameWorks, OldFunName, Arity, NewFunName) ->
      case lists:keysearch(commontest, 1, UsedFrameWorks) of 
  
negative.code: 		    NodeToks = get_toks(FileName, Node, TabWidth),
  		    try refac_epp:expand_macros(NodeToks, {Ms, UMs}) of
  			NewToks when is_list(NewToks)->
  			    case refac_parse:parse_exprs(NewToks++[{dot,{999,0}}]) of 
  				 {ok, Exprs} ->
  				    try erl_eval:exprs(Exprs, []) of 
  					{value, Val, _} -> {value, Val}
  				    catch
  					_:_ -> {error, no_value}
  				    end;
  				_ -> {error, no_value}
  			    end
  		    catch
  			_:__ -> {error, no_value}
  