anchor.diff:      end.
   
   
  -file_info(DirFileList)->
  -     FileNames = refac_util:expand_files(DirFileList, ".erl"),
  -     refac_io:format("No of files:\n~p\n", [length(FileNames)]),
  -     lists:sum(lists:map(fun(F) ->
  -		       Toks= refac_util:tokenize(F, false, 8),
  -		       {L, _} = token_loc(lists:last(Toks)),
  -		       L
  -	       end, FileNames)).
  +%% file_info(DirFileList)->
  +%%      FileNames = refac_util:expand_files(DirFileList, ".erl"),
  +%%      refac_io:format("No of files:\n~p\n", [length(FileNames)]),
  +%%      lists:sum(lists:map(fun(F) ->
  +%% 		       Toks= refac_util:tokenize(F, false, 8),
  +%% 		       {L, _} = token_loc(lists:last(Toks)),
  +%% 		       L
  +%% 	       end, FileNames)).
       
  
positive.code:     ?debug("current time:~p\n", [time()]),
      display_clone_result(Cs6, "Duplicated"),
      ?debug("No of Clones found:\n~p\n", [length(Cs6)]),
     %% ?debug("Clones:\n~p\n", [Cs6]),
      {ok, "Duplicated code detection finished."}.
  
  duplicated_code_detection(DirFileList, MinClones, MinLength, MaxPars, TabWidth) ->
  
negative.code:     {S, E} = refac_util:get_range(Tree),
      if (S >= Start) and (E =< End) ->
  	    case F(Tree) of
  		true -> 
  		    [{Tree, Type}];
  		_ -> []			
  	   end;
         (S > End) or (E < Start) -> [];
         (S < Start) or (E > End) ->
  	    Fun(Tree);
         true -> []
      end.
  
  