anchor.diff:  			  ets:insert(VarTab, {{FName, FunName, Arity}, AllVars}),
   			  refac_util:full_tdTP(fun generalise_and_hash_ast_2/2, 
   					       Form, {FName, FunName, Arity, ASTTab,Pid});
  -		      _ -> ok
  +			  _ -> ok
   		  end
   	  end,
       {ok, {AnnAST, _Info}} = parse_annotate_file(FName,SearchPaths, TabWidth),
       refac_syntax:form_list_elements(AnnAST),
  -    lists:foreach(fun(F)->Fun(F) end, refac_syntax:form_list_elements(AnnAST)).
  +    lists:foreach(fun(F)->Fun(F) end, refac_syntax:form_list_elements(AnnAST)),
  +    insert_dummy_entry(Pid).
   
   
   
  
positive.code: 	    [get_generalised_form(ASTTab, RangeTab, C)||C<-Cs]
      end;
  examine_clone_sets([C|Cs],MinFreq, SimiScore, ASTTab, VarTab, RangeTab, Pid, Num) ->
      ?debug("\nChecking the ~pth clone candidate...\n", [Num]),
      Res =examine_a_clone_set(C, MinFreq, SimiScore, ASTTab, VarTab, RangeTab,Pid),
      add_new_clones(Pid, Res),
      examine_clone_sets(Cs, MinFreq, SimiScore, ASTTab, VarTab, RangeTab, Pid, Num+1).
  
negative.code:     Ranges1=[{{F, SLine, SCol}, {F, EndLine, EndCol}} || 
  		{{F,_, _},{SLine, SCol}, {EndLine, EndCol}} <-Ranges],
      {Ranges1, Len, Freq, C}.
  
  
  remove_sub_clones(Cs) ->
      remove_sub_clones(lists:reverse(Cs),[]).
  