anchor.diff:  
   -include_lib("xmerl/include/xmerl.hrl").
   
  --import(lists, [foldl/3,foldr/3,reverse/1, keysearch/3, map/2, filter/2]).
  +-import(lists, [foldl/3,foldr/3,reverse/1,keysearch/3,map/2,filter/2,droplast/1]).
   -import(proplists, [get_value/2,get_value/3]).
   
   -compile(export_all).
  
positive.code: meta_info(C=#class{name=CName,methods=Ms0}) ->
      Ms = lists:append(Ms0),
      HaveConstructor = lists:keymember(constructor, #method.method_type, Ms),
      case lists:keysearch(destructor, #method.method_type, Ms) of
  	false when HaveConstructor -> 
  	    Dest = #method{name = "destroy", id = next_id(func_id),
  			   method_type = destructor, params = [this(CName)]},
  
negative.code: 		[] ->
  		    erl_skip_opt2(Ms,[F|Acc1],[M#method{where=erl_no_opt}|Acc2],[]);
  		_  ->
  		    Skipped = droplast(In),
  		    T = fun({_,{_,Args,_},_}) -> true =:= types_differ(Skipped,Args) end,
  		    case lists:all(T, Check) of
  			true ->
  