anchor.diff:  	    {ok, Res}
       end.
   
  -
  --spec(gen_fun_2_eclipse/8::(filename(), atom(), atom(), integer(), pos(), syntaxTree(), [dir()], integer()) 
  -	  ->{ok, [{filename(), filename(),string()}]}|{unknown_side_effect, {atom(),atom(),integer(), pos(), syntaxTree()}}).
  -gen_fun_2_eclipse(FileName, ParName1, FunName, FunArity, FunDefPos, Exp, SearchPaths, TabWidth) ->
  -    %% somehow I couldn't pass AST to elisp part, as some occurrences of 'nil' were turned into '[]'.
  -    {ok, {AnnAST, Info}} = refac_util:parse_annotate_file(FileName,true, SearchPaths, TabWidth),
  -    {ok, ModName} = get_module_name(Info),
  -    SideEffect = refac_util:has_side_effect(FileName, Exp, SearchPaths),
  -    case SideEffect of  
  -	false ->AnnAST1=gen_fun(ModName, AnnAST, ParName1, 
  -				FunName, FunArity, FunDefPos,Info, Exp, SideEffect),
  -		Res = [{FileName, FileName, refac_prettypr:print_ast(refac_util:file_format(FileName),AnnAST1)}],
  -		{ok, Res};		
  -	true -> AnnAST1=gen_fun(ModName, AnnAST, ParName1,FunName, FunArity, FunDefPos,Info, Exp, SideEffect),
  -		Res = [{FileName, FileName, refac_prettypr:print_ast(refac_util:file_format(FileName),AnnAST1)}],
  -		{ok, Res};		
  -	unknown ->
  -	    {unknown_side_effect, {ParName1, FunName, FunArity, FunDefPos,Exp}}
  -    end.	  
  +%% It looks like this is no longer needed.
  +%% -spec(gen_fun_2_eclipse/8::(filename(), atom(), atom(), integer(), pos(), syntaxTree(), [dir()], integer()) 
  +%% 	  ->{ok, [{filename(), filename(),string()}]}|{unknown_side_effect, {atom(),atom(),integer(), pos(), syntaxTree()}}).
  +%% gen_fun_2_eclipse(FileName, ParName1, FunName, FunArity, FunDefPos, Exp, SearchPaths, TabWidth) ->
  +%%     %% somehow I couldn't pass AST to elisp part, as some occurrences of 'nil' were turned into '[]'.
  +%%     {ok, {AnnAST, Info}} = refac_util:parse_annotate_file(FileName,true, SearchPaths, TabWidth),
  +%%     {ok, ModName} = get_module_name(Info),
  +%%     SideEffect = refac_util:has_side_effect(FileName, Exp, SearchPaths),
  +%%     case SideEffect of  
  +%% 	false ->AnnAST1=gen_fun(ModName, AnnAST, ParName1, 
  +%% 				FunName, FunArity, FunDefPos,Info, Exp, SideEffect),
  +%% 		Res = [{FileName, FileName, refac_prettypr:print_ast(refac_util:file_format(FileName),AnnAST1)}],
  +%% 		{ok, Res};		
  +%% 	true -> AnnAST1=gen_fun(ModName, AnnAST, ParName1,FunName, FunArity, FunDefPos,Info, Exp, SideEffect),
  +%% 		Res = [{FileName, FileName, refac_prettypr:print_ast(refac_util:file_format(FileName),AnnAST1)}],
  +%% 		{ok, Res};		
  +%% 	unknown ->
  +%% 	    {unknown_side_effect, {ParName1, FunName, FunArity, FunDefPos,Exp}}
  +%%     end.	  
       
       
   
  
positive.code: 	_ -> {Tree, false}
      end.
  
  gen_fun_clause(FileName, ParName, FunName, Arity, DefPos, Exp, TabWidth, SideEffect) ->
      {ok, {AnnAST, Info}} = refac_util:parse_annotate_file(FileName,true, [],TabWidth),  
      {ok, ModName} = get_module_name(Info),
      Forms = refac_syntax:form_list_elements(AnnAST),
  
negative.code:        Tree2.
  
  
  -spec(gen_fun_1/8::(SideEffect::bool(), FileName::filename(),ParName::atom(), FunName::atom(),
  		    Arity::integer(), FunDefPos::pos(), Exp::syntaxTree(), TabWidth::integer())
        -> {ok, [filename()]}).
  gen_fun_1(SideEffect, FileName,ParName, FunName, Arity, DefPos, Exp, TabWidth) ->
      gen_fun_1(SideEffect, FileName,ParName, FunName, Arity, DefPos, Exp, TabWidth,emacs).
  
  -spec(gen_fun_1_eclipse/8::(SideEffect::bool(), FileName::filename(),ParName::atom(), FunName::atom(), 
  			    Arity::integer(), FunDefPos::pos(), Expr::syntaxTree(), TabWidth::integer()) 
        -> {ok, [{filename(), filename(),string()}]}).
  gen_fun_1_eclipse(SideEffect, FileName,ParName, FunName, Arity, DefPos, Exp, TabWidth) ->
      gen_fun_1(SideEffect, FileName,ParName, FunName, Arity, DefPos, Exp, TabWidth, eclipse).
  
  