anchor.diff:      end.
   
   
  --spec(cursor_at_fun_clause/5::(filename(), integer(), integer(), [dir()], integer()) ->
  -	     true |false).
  -cursor_at_fun_clause(FileName, Line, Col, SearchPaths, TabWidth) ->    
  -    {ok, {AnnAST, _Info}} =refac_util:parse_annotate_file(FileName,true, SearchPaths, TabWidth),
  -    case pos_to_fun_clause(AnnAST, {Line, Col}) of 
  -	{ok, _} -> true;
  -	_  -> false
  -    end.
  -    
  -	
   pos_to_fun_clause(Node, Pos) ->
       case refac_util:once_tdTU(fun pos_to_fun_clause_1/2, Node, Pos) of
   	{_, false} -> {error, none};
  
positive.code: 		      list_to_integer(Arity), list_to_integer(ClauseIndex),
  		      SearchPaths, TabWidth, emacs).
  
  -spec(fold_expr_by_name_eclipse/7::(filename(), string(), string(), string(), string(), [dir()], integer()) ->
  	     {ok, [{{{integer(), integer()}, {integer(), integer()}}, syntaxTree()}]}).
  		
  
  fold_expr_by_name_eclipse(FileName, ModName, FunName, Arity, ClauseIndex, SearchPaths, TabWidth) ->
      fold_by_name_pre_cond_check(ModName, FunName, Arity, ClauseIndex),
      fold_expr_by_name(FileName, list_to_atom(ModName), list_to_atom(FunName),
  		      list_to_integer(Arity), list_to_integer(ClauseIndex),
  		      SearchPaths, TabWidth, eclipse).
  
  
  fold_by_name_pre_cond_check(ModName, FunName, Arity, ClauseIndex) ->
  
negative.code: -module(refac_fold_expression).
  
  -export([fold_expr_by_loc/5, do_fold_expression/5,
  	 fold_expr_by_loc_eclipse/5, fold_expr_1_eclipse/5,
  	 fold_expression_1/5,
  	 fold_expr_by_name/7, fold_expr_by_name_eclipse/7]).
  	
  -export([expr_unification/2, fold_expression/6]).
  
  -include("../include/wrangler.hrl").
  